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Introduction 



AMSTRAD CPC664 

Integrated Computer/Disc System 

About us.... 



-d The AMSTRAD CPC664 follows in the tradition of the successful CPC464 computer 

^ system. The widespread acclaim given to th i s computer has encouraged us to take the 

mm next logical step, and to combine the best elements of the CPC464 and DDI1 disc 

^ drive, together with many new features and enhancements. The resulting package 

- the CPC664, offers a performance and wealth of facilities unrivalled in the world of 
*$ personal computers today. 

m$ Your product is supported by one of the largest consumer electronics organisations in 

the country, and the AMSTRAD computer users' club with its authoritative monthly 
■** magazine is already firmly established as the leading source of news and 

^ information. 

Available software and compatibility.... 

^-s The CPC664 runs virtually all CPC464 software, giving the owner an instant and 

enviable choice of software from AMSOFT's extensive range, as well as the products 
■3 of many independent vendors. 



■3 

■9 The disc is undoubtedly replacing the cassette as the data and program storage 



Why disc? 



medium for all but the most casual computer user, and since the power and 
friendliness of the CPC464 quickly transformed 'casual' users into enthusiasts, the 



^ '664 will be the natural choice for many. 

^ Thank you Digital Research.... 

jj The power of Digital Research's CP/M operating system has not previously been 

available at such low cost, and we look forward to the innovative software that can be 

p» written in an environment which provides over 160K of memory on each side of a disc. 

* 
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Digital Research's Dr. LOGO has emerged as the most universal educational and 
teaching medium. Combining the unique user friendliness of turtle graphics' with 
sophisticated processing power, Dr. LOGO is acclaimed as the most comprehensive 
implementation of LOGO available. 



Thank you Amstrad! 

Both CP/M and Dr. LOGO are provided free with your CPC664 system. 



What's new? 

The CPC664 also takes the opportunity to refine and add some features and BASIC 
commands not previously available on the CPC464 (area fills, dotted line drawing, 
character copying from the screen, frame flyback synchronisation, switchable cursor, 
etc.) Programs using these new features will not be downwards compatible to the 
CPC464, although transportability from the CPC464 upwards to the CPC664 is not 
compromised in any way. 



AMSOFT 

A division of 




CONSUMER ELECTRONICS PLC 

© Copyright 1985 AMSOFT, AMSTRAD Consumer Electronics pic 



Neither the whole nor any part of the information contained herein, nor the product described in this 
manual may be adapted or reproduced in any material form except with the prior written approval of 
AMSTRAD Consumer ElectronicsplcfAMSTRAiy). 

The product described in this manual and products for use with it are subject to continuous development 
and improvement All information of a technical nature and particulars of the product and its use 
(including the information and particulars in this manual) are given by AMSTRAD in good faith. 
However, it is acknowledged that there may be errors or omissions in this manual . A list of details of any 
amendments or revisions to this manual can be obtained by sending a stamped, self addressed envelope to 
AMSOFT Technical Enquiries. We ask that all users take care to submit their reply paid user registration 
and guarantee cards 

You are also advised to complete and send off your Digital Research User registration card. 
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AMSOFT welcome comments and suggestions relating to the product or this manual. 
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All correspondence should be addressed to: 

AMSOFT 

Brentwood House, 
169 Kings Road, 

Brentwood, 
Essex CM144EF 



All maintenance and service on the product must be carried out by AMSOFT 
authorised dealers. Neither AMSOFT nor AMSTRAD can accept any liability 
whatsoever for any loss or damage caused by service or maintenance by unauthorised 
personnel. This manual is intended only to assist the reader in the use of the product, 
and therefore AMSOFT and AMSTRAD shall not be liable for any loss or damage 
whatsoever arising from the use of any information or particulars in, or any error or 
omission in, this manual or any incorrect use of the product. 



Dr LOGO and CP/M are trademarks of Digital Research Inc. 

Z80 is the trademark oPZi log Inc. 

IBM and IBM PC are trademarks of International Business Machines Inc. 

AMSDOS, CPC664, and CPC464 are trademarks of AMSTRAD Consumer Electronics pic. 

First Published 1985 

Compiledby IvorSpital 

Written by Roland Perry, Ivor Spital, William Poel,ClifTLawson, 

with acknowledgements to Locomotive Software Ltd. 

Published by AMSOFT 
Typeset by KAMSET typesetting graphics (Brentwood) 



AMSTRAD is a registered trademark of AMSTRAD Consumer Electronics pic. 
Unauthorised use of the trademark or word AMSTRAD is strictly forbidden. 
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IMPORTANT 



You must read this. 



Installation Notes 

1. Always connect the Mains Lead to a 3-pin plug following the instructions 
contained in part 1 of the Foundation course. 

2. Never attempt to connect the system to any Mains Supply other than 
220-240V - 50Hz. 

3. There are no user serviceable parts inside the system. Do not attempt to gain 
access into the equipment. Refer all servicing to qualified service personnel. 

4. To avoid eye-strain, the monitor should be placed as far away as possible from 
the keyboard and operated in an adequately lit room. The monitor 
BRIGHTNESS control should be kept to as low a setting as possible. 

5. The computer should be placed centrally in front of the monitor, but as far away 
from the screen as possible. For maximum data reliability, the disc drive section 
of the computer should NOT be placed directly in front of the monitor, but to the 
right of it. Do not place the computer close to any source of electrical 
interference. 

6. Always keep disc drives and discs away from magnetic fields. 

7. If you are operating a 2-drive system, keep the interconnecting ribbon cable to 
the 2nd drive, away from Mains Leads. 

8. Do not block or cover any ventilation holes. 

9. Do not use or store the equipment in excessively hot, cold, damp, or dusty areas. 



Operation Notes 

(Don't worry if you are a little baffled by the technical jargon in this section; the 
importance of these warnings will become clearer as you work through this manual.) 

1. Never switch the system on or off with a disc in the drive. Doing so will corrupt 
your disc, losing valuable programs or data. 



Warnings CPC 664 



2. Always make back-up (duplicate) copies of discs which contain valuable 
programs. It is especially important to make a back-up copy of the master CP/M 
system disc provided with the CPC664. Should you otherwise accidentally lose 
or corrupt your disc, replacing it could prove expensive. 

3. Make sure that you do not accidentally overwrite your master CP/M system 
disc, by ensuring that the Write Protect holes on the disc are always open. 

4. If you are operating a 2-drive system, i.e. if you have purchased an additional 
AMSTRAD FD1, always switch on the 2nd disc drive before switching on the 
computer, 

5. Never touch the floppy disc surface itself, inside its protective casing. 

6. Do not eject a disc while it is being read from or written to. 

7. Always remember that formatting a disc will erase any previous contents. 

8. The internal disc interface occupies a small portion of the memory that in some 
cases, was used by commercial writers of cassette based software for the 
AMSTRAD model CPC464. These cassettes will not operate properly with the 
CPC664 + Cassette unit. If you have any queries regarding cassette based 
software compatibility, contact AMSOFT on Brentwood (0277) 230222. Note 
however, that most major AMSOFT software titles are available on disc for the 
CPC664. 

9. The licence agreement for your CP/M system disc, (which is electronically 
serial-number encoded) permits its use on a single computer system only. In 
particular this means that you are prohibited from giving any other person a 
disc with YOUR serial-numbered copy of CP/M on it. Carefully read the End 
User Licence Agreement towards the end of this manual. 
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AMSTRAD CPC664 FOUNDATION COURSE 



Part 1 : Setting Up.— 



The CPC664 can be set up with either: 

1 . The AMSTRAD GT65 Green Tube Monitor 

2. The AMSTRAD CTM644 Colour Monitor 

3. The AMSTRAD MP2 Modulator/Power Supply and a domestic '(UHF) colour 
TV receiver. 

Fitting a Mains Plug 

The CPC664 operates from a 220-240Volt~ 50Hz Mains supply. Fit a proper Mains 
Plug to the Mains Lead of either the GT65, CTM644, or MP2. If a 13 Amp (BS1363) 
Plug is used, a 5 Amp Fuse must be fitted. The 13 Amp Fuse supplied in a new plug 
must NOT be used. If any other type of Plug is used, a 5 Amp Fuse must be Fitted 
either in the Plug or Adaptor or at the Distribution Board. 

Important 

The wires in the Mains Lead are coloured in accordance with the following code: 

Blue : Neutral 
Brown :Live 

As the colours of the wires in the Mains Lead of this apparatus may not correspond 
with the coloured markings identifying the terminals in your plug, proceed as 
follows: 

The wire which is coloured BLUE must be connected to the terminal which is marked 
with the letter 'N' or coloured Black. 

The wire which is coloured BROWN must be connected to the terminal which is 
marked with the letter 'L' or coloured Red. 

Disconnect the Mains Plug from the Supply Socket when not in use. 

Do not attempt to remove any screws, nor open the casing of the computer, monitor, or 
Modulator/Power supply unit. Always obey the warning on the rating label which is 
located underneath the case of the CPC664 and MP2, and on the rear cabinet of the 
GT65andCTM644: 

WARNING - LIVE PARTS INSIDE. DO NOT REMOVE ANY SCREWS 
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Connecting the computer to a monitor 



(If you are using the CPC664 with the MP2 Modulator/Power supply, skip to the next 
section.) 



Make sure that the monitor is not plugged into the Mains supply socket. 

Connect the lead from the front of the monitor, which is fitted with the larger 
(6-pin DIN) plug, into the rear socket of the computer marked MONITOR. 

Connect the lead from the front of the monitor, which is fitted with the smaller 
(5 V DC) plug, into the rear socket on the computer marked 5V DC. 

Connect the lead from the back of the computer, which is fitted with a small 
(12V DC) plug, into the socket at the front of the monitor. 



gS 



-rr+ 
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Connecting the computer to an MP2 
Modulator/Power supply unit 

The MP2 is an additional item that you may wish to purchase if you are currently 
using your CPC664 computer with the GT65 green tube monitor. The MP2 enables 
you to to use the computer with your domestic colour TV and thereby enjoy the full 
colour facilities of your CPC664 computer. 

The MP2 should be positioned next to the right band end of the CPC664. 



1. 



Make sure that the MP2 is not plugged into the Mains supply socket. 



5. 



Connect the lead from the MP2 which is fitted with the larger (6-pin DIN) plug, 
into the rear socket of the computer marked MONITOR. 

Connect the lead from the MP2 which is fitted with the smaller (5V DC) plug, 
into the rear socket on the computer marked 5V DC. 

Connect the lead from the MP2 which is fitted with an aerial plug, into the 
AERIAL or ANTENNA socket of your TV set. 

Connect the lead from the back of the computer, which is fitted with a small 
(12VDC) plug, into the socket atthe rearof the MP2. 
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Switching on - CPC664 and GT65/CTM644 system 

(If you are using the CPC664 with the MP2 Modulator/Power supply, skip to the next 
section,) 

Having connected up the system as shown previously, insert the Mains Plug into the 
Supply socket and switch on. Press the POWER button at the bottom right hand 
corner of the monitor so that it is set to the IN position. When the button is set to the 
OUT position, the Mains supply to the system is OFF. 

Switch on the computer using the slide switch marked POWER at the right hand end. 

The red ON lamp at the top centre of the keyboard should be illuminated, and the 

monitor will display the following picture: 



Am s trad G4K Microcomputer <v8> 

©1984 Amstrad Consumer Electronics pic 
and Locomotive Software Lid . 

BASIC 1.1 
Ready 



To avoid unnecessary eye-strain, adjust the control marked BRIGHTNESS until the 
display is adequately bright for comfortable viewing, without glare or blurring of the 
characters on the screen. 

The BRIGHTNESS control will be found on the lower front panel of the GT65, or at the 
right hand side of the CTM644. 

If you are using the GT65 green monitor, you may need to adjust the CONTRAST and 
Vertical HOLD controls on the lower front panel. 

The CONTRAST should be adjusted to the minimum setting consistent with 
comfortable viewing. 

The Vertical HOLD control on the GT65 is marked V-HOLD, and should be adjusted so 

that the display is correctly positioned in the middle of the screen, without 'jitter' or 
'roll'. 
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Switching on - CPC664 and MP2 
Modulator/Power supply system 

Having connected up the system as shown previously, insert the Mains Plug into the 
Supply socket. 

Switch on the computer using the slide switch marked POWER at the right hand end. 

The red ON lamp at the top centre of the keyboard should be illuminated, and you 
must now tune in your TV set to receive the signal from the computer. 

If you have a TV with push-button channel selection, press a channel button to select 
a spare or unused channel. Adjust the corresponding tuning control in accordance 
with the TV set manufacturer's instructions (the signal will be approximately at 
channel 36 if your TV has a marked tuning scale), until you receive a picture that 
looks like: 



Amstrad 64K Microcomputer <v2> 

©1984 Am s trad Consumer E lectroni cs pic 
and Locomotive Software Lid . 

BASIC 1.1 

Ready 



Tune in the TV set accurately until the clearest picture is seen. The writing will be 
gold/yellow on a deep blue background. 

If your TV has a rotary programme selector knob, turn the tuning knob until the 
above picture appears and remains perfectly steady. (Again, at approximately 
channel 36). 
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Other Connections.... 

If you wish to connect any other peripherals to the standard system, namely: 

Joystick(s) 

Cassette unit 

Printer 

2nd disc drive 

Externa] amplifier/speakers 

Expansion device(s) 

....details will be found in part 2 of this Foundation course. 

Finally, check that you have observed the following warnings given at the beginning 
of this manual, in the section entitled 'IMPORTANT': 

INSTALLATION NOTES 1,2,4,5,6,7,8 
OPERATION NOTE 1 
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AMSTRAD CPC664 FOUNDATION COURSE 

Part 2: Connecting your 
peripherals.... 



This section explains how the various peripherals, or add-ons, are connected to the 
CPC664 system. Details concerning the use of these devices will be found in the 
appropriate sections of this manual. 



Joystick 

The AMSOFT joystick model JY2 is an additional item that you may wish to 
purchase if you are using the CPC664 computer with games software which 
incorporates the facility for joystick control and Tiring'. 

Connect the plug fitted to the JY2 lead into the socket marked JOYSTICK on the 
computer. The CPC664 can be used with two joysticks; the second joystick should be 
plugged into the socket on the firstjoystick. 

The AMSOFT joystick model JY1 is also suitable for use with this computer. 

Further information on joysticks will be found later in this manual. 



Cassette unit 

Programs may be loaded from, or saved to tape instead of disc. The commands which 
instruct the computer to direct data to and from disc or tape are explained later in this 
manual. 

To connect your cassette unit to the CPC664, you will require the AMSOFT CL1 lead, 
or any other equivalent standard cassette-interconnecting lead. 

Insert the end of the lead with the larger (5-pin DIN) plug, into the socket marked 
TAPE on the computer. 

Insert the plug at the end of the Blue cable into the socket on your cassette unit 
marked REMOTE or REM. 

Insert the plug at the end of the Red cable into the socket on your cassette unit 
markedMIC, COMPUTERIN, or INPUT. 

Insert the plug at the end of the White cable into the socket on your cassette unit 
marked EAR, COMPUTER OUT, or OUTPUT. 
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It is important to remember that the successful transfer of data between the CPC664 
and cassette is largely dependent upon the correct setting of the LEVEL or VOLUME 
control on your cassette unit. If you cannot seem to load or save programs properly, 
experiment with different LEVEL control positions until the optimum setting is 
found. 



Printer 

The CPC664 may be used with any Centronics compatible parallel printer. If you in- 
tend to connect the AMSTRAD DMP1 to the CPC664, simply use the interconnecting 
lead provided with the printer. 

If you wish to use any other Centronics compatible printer, you will require the 
AMSOFT PL1 printer interconnecting lead. 

Connect the end of the lead which is fitted with the flat edge-connector plug, into the 
socket marked PRINTER at the rear of the computer. 

Connect the other end of the lead which is fitted with a Centronics style plug, into the 
socket at the rear of the printer. If the printer is equipped with security clips at each 
side of the socket, these may be clipped into the cut-outs at the side of the printer plug. 

Details of printer operation will be found later in this manual. 



A 2nd disc drive (AMSTRAD FD1) 

The AMSTRAD FD1 may be added to the system as a 2nd disc drive. The advantages 
of a 2-drive system will be particularly apparent to the regular CP/M user, since 
many programs are configured to run with the library program disc inserted in one 
drive, and the working data files stored on a disc in the second drive. 

Operation under CP/M always requires that a program be loaded from disc (there is 
no access to the ROM BASIC). Since CP/M allows the use of multiple files by an 
overlay technique that permits programs that are larger than the RAM memory, the 
actual library disc may contain so many program files that there is little workspace 
left for the data. 

Thanks to the versatility of the utilities provided with your CPC664 system disc, you 
can do all necessary file maintenance; copying, erasing etc, on a single disc drive. 
However a second drive will certainly speed up these processes and reduce the scope 
for accidents. 

To connect the FD1 to the CPC664, you will require the AMSOFT DI2 disc inter- 
connecting lead. 
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Connect the end of the lead which is fitted with the larger edge-connector plug, into 
the socket marked DISC DRIVE 2 at the rear of the computer. 

Connect the other end of the lead which is fitted with a smaller plug, into the socket at 
the rear of the FD1 disc drive. 

DON'T FORGET - Before connecting or disconnecting the 2nd disc drive, make sure 
that any discs are removed from both drives, and that the system is switched off. If 
connections are altered while the system is on, it is likely that the program in the 
computer's memory will be corrupted. Always save any valuable programs before 
meddling with connections! 

When the FD1 is connected to the CPC664, FIRST switch on the FDr using the slide 
switch on the rear panel of the disc drive, THEN switch on the CPC664 using the slide 
switch at the right hand side of the computer. Both the green and red indicators on 
the front panel of the FD1 should be illuminated. The 2-drive system will then be 
readyto operate. 

Details of 2-drive operation will be found later in this manual. 



External amplifier/speakers 

The CPC664 may be connected to a stereo amplifier and speakers to enjoy the full 
3-channel capabilities of the computer. 

The input lead to your stereo amplifier should be terminated with a 3.5mm stereo 
jack plug, which should be inserted into the socket marked STEREO on the computer. 

The connections to the jack plug are: 

Plug tip - Left channel 

Plug inner ring - Right channel 

Plug rear shaft - Ground (Common) 

The CPC664 will provide a fixed voltage signal out of the STEREO socket, and you 
should therefore use the controls on the amplifier itself to regulate volume, balance 
and tone. 

High impedance headphones will also operate with the CPC664, however the volume 
will not be adjustable by the VOLUME control on the computer. Low impedance 
headphones, such as those usually used with stereo systems, will not operate directly 
plugged into the computer. 

Details concerning the directing of sound to the required output channel will be found 
later in this manual. 
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Expansion devices 



Expansion devices such as serial interfaces, modems, light pens, ROMs etc may be 
connected to the CPC664, using the socket marked EXPANSION at the rear of the 

computer. 

The AMSOFT speech synthesiser/amplifier model SSA2 may also be connected to 

this socket. 

Details of connections to the EXPANSION socket will be found in the chapter entitled 
'For your reference....'. 

Finally, check that you have observed the following warnings given at the beginning 
of this manual, in the section entitled 'IMPORTANT': 

INSTALLATION NOTES 6,7 
OPERATION NOTES 4,8 
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Part 3: About Discs.... 



The AMSTRAD CPC664 uses 3 inch compact floppy discs. We strongly recommend 
that for reliable data-to-disc transfer, you use only AMSOFT CF2 compact floppy 
discs. Discs made by leading manufacturers however, may also be used. 



Insertion 

Each side of a disc may be used separately. A disc should be inserted with its label 
facing outward from the drive, and with the side that you wish to use face up: 
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Write Protection 

In the left hand corner of each side of a blank disc, you will see an arrow pointing to a 
small shuttered hole. This is called the Write Protect hole, and facilitates protection 
against erasure or 'overwriting': 



Write Protect hole 

■OS - " 




When the hole is closed, data can be 'written' onto the disc by the computer. When the 
hole is open however, the disc will not allow data to be written onto it, thus enabling 
you to avoid accidental erasure of valuable programs. 

Various compact floppy disc manufacturers employ different mechanisms for 
opening and closing tbe Write Protect hole. The operation may be carried out on the 
AMSOFT CF2 compact floppy disc as follows: 

To open the Write Protect hole, slide the small shutter located at the left hand corner 
of the disc, and the hole will be opened: 

Write Protect hole (OPEN) j 

i: 



Shutter 
OPEN' 



Shutter fj] 
CLOSED - ^ 



i. I 



Write Protection ON 

II 




Write Protection OFF 

u 



To close the Write protect hole, simply slide the shutter to its closed position. 
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Some other compact floppy discs employ a small plastic lever located in a slot at the 
left hand corner: 



Lever 




Write Protect 

hole 

(CLOSED) 



To open the Write Protect hole on this type of disc, slide the lever towards the middle 
of the disc, using the tip of a ball-point pen or similar object: 



Slide Lever 

towards middle 

of disc 



Write Protect 

hole 

(OPEN) 







Note that regardless of the method employed to open and close the Write Protect hole, 
opening the hole in all cases facilitates protection against overwriting. 

IMPORTANT 

Always ensure that the Write Protect holes on your master CP/M system disc are 
open. 
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When Your Disc is in 

At the front of the computer's disc drive, you will see a red indicator lamp, and a push 
button for Eject: 



Indicator 
Lamp 




ji/uiniuinjinjuirinjuuui 




Eject 
Button 



Indicator Lamp 

This indicates that data is being read from, or written to the disc. 

If a 2nd disc drive is connected, the red indicator on the 2nd disc drive (Drive B) will 
illuminate constantly. It will extinguish when the main disc drive within the 
computer (Drive A) is reading or writing to disc. 

Eject Button 

Pressing in the Eject button allows you to remove your disc from the drive. 

Finally, check that you have observed the following warnings given at the beginning 
of this manual in the section entitled 'IMPORTANT'; 

OPERATION NOTES 1, 3,4, 5,6 
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Part 4: Getting Started.... 



Before we start loading software and saving programs to disc, let's get familiar with 
some of the keys on the computer. Those of you who are experienced in using 
computers may skip this section. 

With the computer switched on and the opening message on the screen, we're going to 
find out what the various keys do.... 

ooOO LARGE ARROW KEYS 

The four large arrow keys (next to the [COPY] key), are called the 'cursor keys'. The 
keys move the position of the cursor (the small solid block) on the screen. 

Press each of the cursor keys in turn, and you will see the cursor move about the 
screen. 

[ENTER] 

There are two [ENTER] keys. Either of these keys enter the information that you 
have typed into the computer. After the [ENTER] key is pressed, a new line is started 
on the screen. Each instruction that you type into the computer should be followed by 
pressingthe [ENTER] key. 

From now on, we will show [ENTER] as meaning press the [ENTER] key after each 
instruction or program line. 

[DEL] 

This key is used to delete a character to the left of the cursor on the screen (for 
example a letter or a number) which is not required. 

Type in a b c d and you will see that the letter d is positioned to the left of the cursor. If 
you decide that you do not want the letter d , press [DEL] once and you will see the d 
removed. If you press [DEL] and continue to hold it down, the letters a b c will also be 
removed. 

[SHIFT] 

There are two [SHIFT] keys. If you press either of these and hold it down whilst typing 
a character, a capital letter or upper case symbol will appear on the screen. 
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Type in the letter e then hold down the [SHIFT] key and type in the letter e again. On 
the screen you will see: 

eE 

Now type in a few spaces by holding down the space bar. Try the following using the 
number keys which are on the top line of the keyboard, above the letter keys. Type in 
the number 2 , then hold down the [SHIFT] key and type in the number 2 again. On 
the screen you will see: 

2" 

You can now see what happens when the [SHIFT] key is held down whilst pressing a 
character key. Experiment by pressing any of the character keys, either on their own, 
or together with the [SHIFT] key. 

[CAPS LOCK] 

This has a similar operation to [SHIFT] except that you only have to press it once. 
From then on each letter that you type in will be in capitals, although the number 
keys will not be shifted. 

Press [CAPS LOCK] once, then type in: 

abcdef 123456 
On the screen you will see: 

ABCDEF1 23456 

You will notice that although all the letters are shifted to capitals, the numbers have 
not been shifted to symbols. If you wish to type in a shifted symbol while 
[CAPS LOCK] is in operation, simply hold down the [SHIFT] key before pressing a 
number key. Type in the following while holding down the [SHIFT] key: 

abcdef 123456 

On the screen you will see: 

ABCEDF!"#$%& 

If you wish to return to small (lower case) characters again, press the [CAPS LOCK] 
key once again. 
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If you wish to type in capital letters and shifted upper case symbols without having to 
constantly hold down the [SHIFT] key, this can be carried out as follows: 

Holding down the [CTRL] key, then press the [CAPS LOCK] key once. This performs 
the function of a 'SHIFT LOCK'. Now type in: 

abcdef 123456 

On the screen you will see: 

ABCDEF!"#$%8 

Note that it is still possible to type in numbers while [CTRL] and [CAPS LOCK] are in 
operation, by using the number keys to the right of the main keyboard. 

Holding down the [CTRL] key and pressing [CAPS LOCK] once, will return you to the 
mode that you were previously in, (i.e. either lower case or capital letters-only). If you 
have returned to the capital letters-only mode, simply press [CAPS LOCK] once again 
to return to the lower case mode. 



[CLR] 

This key is used to clear a character within the cursor. 

Type inABCDEFGH. The cursor will be positioned to the right of the last letter typed 
(H). Now press the cursor left key four times. The cursor will have moved four 
places to the left, and will be superimposed over the top of the letter E . 

Notice how the letter E is still visible within the cursor. Press the [CLR] key once and 
you will see that the letter E has been cleared and the letters F 6 H have each moved 
one space to the left with the letter F now appearing within the cursor. Now press the 
[CLR] key again and hold it down. You will see how the letter F is cleared followed by 
the letters G and H . 



[ESC] 

This key is used to [ESC]ape from a function that the computer is in the process of 
carrying out. Pressing the [ESC] key once will cause the computer to temporarily 
pause in its function, and will continue again if any other key is pressed. 

Pressing the [ESC] key twice will cause the computer to completely [ESCJape from 
the function which it is carrying out. The computer is then ready for you to type in 
some more instructions. 
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Important 

When you reach the right hand edge of the screen by entering 40 characters on a line, 
the next character will automatically appear on the following line at the left edge of 
the screen. This means that you should NOT press [ENTER] as those of you 
accustomed to typewriters might press a carriage return towards the right edge of a 
page. 

The computer does this automatically for you , and will react to an unwanted [ENTER] 
by printing an error message - usually aSyntax error, either there and then, or 
when the program is run. 

Syntax Error 

If the message: Syntax error appears on the screen, the computer is telling you 
that it does not understand an instruction that you have entered. 

For example type in: 

p r i n 1 1 [ENTER] 
On the screen you will see the message: 

Syntax error 

The message appears because the computer has not understood the instruction: 
pr i ntt 

If you type a mistake in the line of a program, such as: 

10 printt "abc" [ENTER] 

The Syntax error message will not appear until the instruction is processed by 
the computer when the program is run. 

Type in; 

r u n [ENTER] 

(This command tells the computer to carry out the program that you have just typed 
into the memory.) 

On the screen you will see: 

Syntax error in 10 
10 flrintt "abc" 
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This message tells you in which line the error has occurred, and displays the program 
line, together with the editing cursor so that you can correct the mistake. 

Press the cursor-right key i> until the cursor is over the t in p r i n 1 1 . Now press the 
[CLR] key to remove the unwanted t , then press the [ENTER] key to enter the 
corrected line into the computer. 

Now type in: 

run [ENTER] 
....and you will see that the computer has accepted the instruction, and has printed: 

abc 

Finally, check that you have observed the following warnings given at the beginning 
of this manual, in the section entitled 'IMPORTANT': 

INSTALLATION NOTES 4,5 
OPERATION NOTE 1 
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AMSTRAD CPC664 FOUNDATION COURSE 



Part 5: Loading Software and 
games.... 



Welcome to those of you who skipped here from the previous section! 

As a quick demonstration of the speed of loading disc software, switch on the system, 
then insert the master CP/M disc supplied, into the drive with Side 1 uppermost. 

Type in: 

run "rointinte.dem" [ENTER] 

After a few seconds the program will have loaded into the memory. Answer the 
question on the screen as to whether you are using a green monitor; (Type Y for Yes, 
or N for No), and you will then see a continuous demonstration of the game 'Roland in 
Time' on the screen. It may even persuade you to go out and buy a copy of the game! 

When you have finished watching the demonstration, you may 'escape' from the 
program by simultaneously holding down the [CTRL] and [SHIFT] keys then pressing 
the [ESC] key. This has the effect of completely resetting the computer, and may be 
used whenever you wish to start afresh. (You do not need to remove any disc from the 
drive when resetting the computer in this way). 

If the program hasn't loaded, study any error message on the screen to see where you 
went wrong: 

Drive A: disc missing 
Retry, Ignore or Cancel? 

....means that you have either not inserted your disc correctly, or, if you have a 
2-drive system, that you have inserted it into Drive B. 

ROINTIME.DEM not found 

....means that you have either inserted the wrong disc, (or the wrong side of the disc), 
or you have not carefully and precisely typed in the name, ROINTIME.DEM 

Bad command 

. . . .means that you have probably mis-typed ROINTIME.DEM by introducing an 
unwanted space or punctuation mark. 
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Type mi smatch 
....means that you have omitted the quotation marks " 

Syntax error 

....means that you mistyped the word run 

Dr i ve A : read fail 
Retry, Ignore or Cancel? 

....means that the computer has failed to read data from your disc. Check that you 
have inserted the correct disc and press R to Retry. This message will appear if ever 
you corrupt your disc by switching the system on or off while the disc is in the drive. 

Once you have learned how to make back-up copies of discs, always do so for valuable 
programs, and especially for your master CP/M system disc. 

Loading AMSOFT software and the WELCOME 
program 

Having hopefully whetted your appetite for the lighter side of computing, let's load a 
game.... 

Insert your software disc in the drive, and type in: 
run "disc" [ENTER] 

After a few seconds, your game will be loaded and ready to play. 

Try typing in: run "di sc" with side 1 of your master CP/M system disc inserted 
into the drive, and you will see and hear the CPC664 continuous 'Welcome' 
demonstration. 

When you have finished watching 'Welcome', reset the computer using the [CTRL] 
[SHIFT] and [ESC] keys. 

The above instruction (run "disc") will load most of the AMSOFT range of disc 
software, but you may come across the odd occasion where you have to type in 
something else. In all cases however, the loading instructions will be found on the 
label of the software disc, which should always be carefully followed. 

Finally, check that you have observed the following warnings given at the beginning 
of this manual, in the section entitled 'IMPORTANT'; 

INSTALLATION NOTE 6 
OPERATION NOTES 1,5,6 
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AMSTRAD CPC664 FOUNDATION COURSE 



Part 6: Let's Compute.... 



So far, we know what we must and mustn't do with the computer, and how to set it up 
and connect peripherals. We know what some of the keys on the computer do, and how 
to load software. Now we'll look at some of the instructions that you can type in to the 
computer to make things happen,,,. 

Like you or I, the computer can only understand instructions in a language that it 
knows, and that language is called BASIC, (short for Beginners' All-purpose 
Symbolic Instruction Code). The words in BASIC'S vocabulary are called 'keywords' 
and each of them tell the computer to perform a specific function. All languages must 
conform to the rules of grammar, and BASIC is no exception. Here, grammar is 
referred to as 'Syntax', and the computer will always be kind enough to tell you if 
you've made aSyntax error! 



An introduction to AMSTRAD BASIC keywords 

In the chapter entitled 'Complete list of AMSTRAD CPC664 BASIC keywords', you 
will find a description of the keywords found in AMSTRAD BASIC. We will introduce 
some of the more commonly used BASIC keywords in this section. 

CLS 

To clear the screen, type in: 

c I s [ENTER] 

You will notice that the screen clears and the word Ready with the cursor ■ will 
appear at the top left of the screen. 

Note that you can use upper case (CAPITAL) or lowercase (small) letters to enter any 
BASIC keyword into the computer. 

PRINT 

This is used whenever you want characters, words or figures in a program to be 
printed. Type in the following instruction line: 

print "hello" [ENTER] 
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On the screen you will see: 

hello 

The quotation marks "" are used to tell the computer what should be printed, 
hello appeared on the screen as soon as the [ENTER] key was pressed. Type in: 

els [ENTER] 

. ...to clear the screen. 



RUN 

The previous example showed a single instruction line. However, as soon as the 
[ENTER] key was pressed, the instruction was carried out then forgotten. It is 
possible to store a series of instructions in the computer to be carried out in a specified 
order. This is achieved by writing a 'program'. The sort of BASIC instructions that 
you write in a program are the same as just shown, but in front of each instruction 
line, a line number is typed in. If there is more than one line in the program, these line 
numbers tell the computer the order in which to carry out or 'run' the program. When 
[ENTER] is pressed the line is stored in the memory until the program is run. Now 
type in: 

10 print "hello" [ENTER] 

Notice that, when [ENTER] was pressed, h e L L o was NOT printed on the screen, but 
instead was entered into the computer's memory as a one-line program. To carry out 
that program, the word run must be used. Type in: 

run [ENTER] 

You will now see h e L L o printed on the screen. 

Note that instead of continually typing in: p r i n t , you can use the ? question-mark 

symbol , for example : 

10 ? "hello" [ENTER] 



LIST 

After a program has been stored in the memory, it is possible to check what has been 
typed in by 'listing' the program. Type in: 

List [ENTER] 
On the screen you will see: 

10 PRINT "hello" 
....which is the program stored in the memory. 



Foundation Course Chapter 1 Page 23 



Notice how the word P R I NT is now in capitals. This means that the computer has 
accepted P R I N T as a known BASIC keyword. 

Type in: c L s [ENTER] to clear the screen. Note that although the screen is cleared 
when you type in: c L s [ENTER], your program is not erased from the computer's 
memory. 

GOTO 

The GOTO keyword tells the computer to go from one line to another in order to either 
miss out a number of lines or to form a loop. Type in: 

10 print "hello" [ENTER] 
20 goto 10 [ENTER] 

Now type: 

run [ENTER] 

....and you will see hello printed continuously on the screen, one under another on 
the left side. The reason for this, is that line 2 of the program is telling the computer 
to go to line 1 and carry on processing the program from there. 

To pause the running of this program, press [ESC] once. To start it again, press any 
other key. To stop it running so that other instructions can be typed in, press [ESC] 
twice. 

Now type in: 

els [ENTER] 

... .to clear the screen. 

To see the word hello printed continuously on each line, one next to another filling 
the whole of the screen, type in the previous program but with a semi-colon ; after 
the quotation marks " 

Type in; 

10 print "hello"; [ENTER] 
20 goto 10 [ENTER] 
run [ENTER] 

Note that the semicolon ; tells the computer to print the next group of characters 
immediately following the previous one, (unless the next group of characters is too 
large to fit on the same line). 
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Escape from this program by pressing [ESC] twice. Now type in line 1 again, but 
this time, use a comma , instead ofasemicolon ; 

10 print "hello", [ENTER] 
run [ENTER] 

You will now see that the comma , has told the computer to print the next group of 
characters 13 columns away from the first group of characters. This feature is useful 
for displaying information in separate columns. Note however, that if the number of 
characters in a group exceeds 12, the next group of characters will be displaced 
forwards by another 13 columns, so as to always maintain a space between columns. 

This figure of 13 columns is adjustable by use of the ZONE command, described later 
in this manual. 

Again, to escape from this program, press [ESC] twice. To clear the computer's 
memory completely, hold down the [CTRL] [SHIFT] and [ESC] keys in that order, and 
the computer will reset. 

INPUT 

This command is used to let the computer know that it is expecting something to be 
typed in, for example, the answer to a question. 

Type the following: 

10 input "how old are you";age [ENTER] 
20 print "you Look younger than";age; 

"years old." [ENTER] 
run [ENTER] 

On the screen you will see: 

what i s you r age? 
Type in your age then [ENTER] . If your age was 18, the screen would then show: 

you Look younger than 18 years old. 

This example shows the use of the input command and a number variable. The 
word age was put into the memory at the end of line 1 so that the computer would 
associate the word age with whatever numbers were typed in and would print these 
numbers where the word a g e is on line 2 . Although we used the expression a g e in 
the above for the variable, we could have just as easily used a letter, for example b . 
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Reset the computer to clear the memory, ([CTRL] [SHIFT] and [ESC] keys). If you had 
wanted an input made up of any characters,(letters or letters and numbers), the 
dollar sign $ must be used at the end of the variable. This type of variable is called a 
'string variable'. 

Type in the following program: (Note that in line 2 you must put a space after the 
in h e L L o and before the m in m y). 

10 input "what is your name";name$ [ENTER] 

20 print "hello ";name$;" my name is Roland" [ENTER] 

run [ENTER] 

On the screen you will see: 

What is your name? 

Type in your name then [ENTER] 

If the name that you entered was Fred, you will see on the screen: 

. Hello Fred my name is Roland 

Although we used n a m e $ in the above example for the name string variable, we 
could have just as easily used a letter, for example a $. Now we will combine the 
above 2 examples into one program. 

Reset the computer by pressing [CTRL] [SHIFT] and [ESC]. Type in the following: 

5 c 1 s [ENTER] 

10 input "what is your name";a$ [ENTER] 
20 input "what is your age";b [ENTER] 
30 print "I must say ";a$;" you dont 

Look";b;"years old" [ENTER] 
run [ENTER] 

In this program we have used 2 variables, a $ for the name and b for the age. On the 
screen you will see: 

what i s you r name? 

Now type in your name (e.g. Fred), then [ENTER]. 
You will then be asked; 

what is your age? 

Now type in your age (e.g. 1 8), then [ENTER]. 
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If your name were Fred and your age 18, on the screen you will see: 
I must say Fred you dont Look 18 years old 



Editing a Program 

If any of the lines in the program had been typed incorrectly, resulting inaSyntax 
erroror other error message, it would be possible to edit that line, rather than type 
it out again. To demonstrate this, let's type in the previous program incorrectly: 

5 cLss [ENTER] 

10 input "what is you name";a$ [ENTER] 
20 input "what is your age";b [ENTER] 
30 print "I must say";a$;" you dont 
Look";b;"years old" [ENTER] 

There are 3 mistakes in the above program: 

In line 5 we typed in c L s s instead of c L s . 

Inline 1 we typed in you instead of you r. 

In line 3 we forgot to put a space between say and the quotation marks " 

There are 3 main methods of editing a program. The first is to simply type in the new 
line again. When a line is retyped and entered, it replaces the same numbered line 
currently in the memory. 

Secondly, there is the editing cursor method. 

Lastly, there is the copy cursor method. 



Editing Cursor Method 

To correct the mistake in line 5 
Type: 

edit 5 [ENTER] 

Line 5 will then appear under line 3 with the cursor superimposed over the c in 
c Lss 

To edit out the extra s in c L s s , press the cursor right key until the cursor 
appears over the last s , then press the [CLR] key. You will see the s disappear. 
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Now press [ENTER] and line 5 will now be corrected in the memory. Type in: 
List [ENTER] 

....to check line 5 is now correct. 

The AUTO command, described later in this manual, may be used to edit a number of 
successive lines in a similar manner to that described in the Editing Cursor Method. 

Copy Cursor Method 

The copy cursor is another cursor (in addition to the one already on the screen) which 
comes into view when you hold down [SHIFT] and press one of the cursor keys. It then 
detaches itself from the main cursor and can then be moved around the screen 
independently. 

To correct the mistakes in line 1 and 30, hold down the [SHIFT] key then press the 
cursor up key o until the copy cursor is positioned over the very beginning of line 
lfl. You will notice the main cursor has not moved, so there are now two cursors on the 
screen. Now press the [COPY] key until the copy cursor is positioned over the space 
between you and name. You will notice that line 1 is being re-written on the last 
line and the main cursor stops at the same place as the copy cursor. Now type in the 
letter r . This will appear on the bottom line only. 

The main cursor has moved but the copy cursor stayed where it was. Now press the 
[COPY] key until the whole of line 1 is copied. Press [ENTER] and this new line 1 
will be stored in the memory. The copy cursor disappears and the main cursor 
positions itself under the new line 10. To correct the second mistake, hold' down 
[SHIFT] and press the cursor up key o until the copy cursor appears over the 
verybeginningofline 30. 

Press [COPY] until the copy cursor is positioned over the quotation marks next to 
say. Now press the space bar once. A space will be inserted on the bottom line. Hold 
down the [COPY] key until the whole of line 3 is copied, then press [ENTER], 

You can now list the program to check that it is corrected in the memory by typing in: 

List [ENTER] 

NOTE: To move the cursor quickly (during editing) to the left or right hand end of a 
line, hold down the [CTRL] key then press the left or right C 1 cursor key once. 

Now reset the computer by pressing [CTRL] [SHIFT] and [ESC] keys. 



IF 

The I F and THEN commands ask the computer to test for a specified condition, then 
take action depending upon the result of that test. For example, in the instruction: 
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if 1 + 1=2 then print "correct" [ENTER] 

... .the computer will test for the specified condition, and then take action accordingly. 

The keyword ELSE can be used to inform the IF THEN command as to what 
alternative action the computer should take if the tested condition is false, for 
example: 

if 1 + 1=0 then print "correct" else print "wrong" [ENTER] 

We will now extend the previous program with the use of the i f and then comands. 

Type in the following: Notice that we have added two symbols. < means less than, and 
is next to the M key. > means greater than , and is next to the < ( less than ) key . 

5 cLs [ENTER] 

10 input "what is your name";a$ [ENTER] 

20 input "what is your age";age [ENTER] 

30 if age < 13 then 60 [ENTER] 

40 if age < 20 then 70 [ENTER] 

50 if age > 19 then 80 [ENTER] 

60 print "So ";a$;", you are not quite a 

teenager at";age;"years old":end [ENTER] 
70 print "So ";a$;", you are a teenager 

at";age;"years oLd":end [ENTER] 
80 print "Oh well ";a$;", you are no 

Longer a teenager at ";age;" years old" [ENTER] 

To check this program is correct, type: 

List [ENTER] 
Now type in : 

run [ENTER] 

Now answer the questions prompted by the computer and see what happens. 

You can now see what effect the I F and THEN commands have in a program. We 
have also added the word E N D at the end of lines 6 and 7 . The keyword E N D is 
used literally to end the running of a program. If END wasn't there in line 60, the 
program would continue to run, and carry out lines 7 and 8 . 
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Likewise, if END wasn't there in line 70, the program would continue to run, and 
carry out line 8 . The colon : before the word END separates it from the previous 
instruction. Colons : can be used to separate two or more instructions on one 
program line. We have also added line 5 to clear the screen at the start of the 
program. We will do this from now on in the following programs to make things look 
neater. 

Reset the computer by pressing [CTRL] [SHIFT] and [ESC] keys. 

FOR and NEXT 

The FOR and NEXT commands are used when you want to carry out a specified 
operation a number of times. The instructions for the specified operation must be 
enclosedbythe FOR NEXT loop. 

Type in: 

5 els [ENTER] 

10 for a = 1 to 10 [ENTER] 

20 print "operation number"; a [ENTER] 

30 next a [ENTER] 

run [ENTER] 

You will see that the operation in line 2 has been carried out 10 times, as instructed 
by the FOR command in line 10. Note also that the value of the variable a is 
increased by 1 each time. 

The keyword STEP may be used to inform the FOR NEXT command how much the 
variable should be 'stepped' per operation. For example, change line 1 to: 

10 for a = 10 to 50 step 5 [ENTER] 
run [ENTER] 

Negative steps may also be used, for example: 

10 for a = 100 to step -10 [ENTER] 
run [ENTER] 

REM 

R E M is short for R E Mark. The instruction tells the computer to ignore anything that 
follows it on the line. Hence you can use R E Marks to inform you of, for example, the 
title of a program, or the use of a variable, as follows: 

10 REM Zap the invaders [ENTER] 

20 L=5 :REM number of Lives [ENTER] 
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The single quote mark ' {which can be typed by holding down [SHIFT] and pressing 
the 7 key) can be used as a substitute for : R E M , For example: 

10 'Zap the invaders [ENTER] 
20 L = 5 'number of Lives [ENTER] 



GOSUB 

If there are a set of instructions within a program which are to be carried out a 
number of times, these instructions need not be typed in repeatedly every time they 
are needed in the program; instead, they can be made into a 'sub-routine* which when 
required, can be called into action by the command GOSUB followed by the line 
number. The end of the G S U B-routine is marked by typing in the instruction 
R E T U R N . At this point the computer will return to the instruction that immediately 
followed the GOSUB command which it had just obeyed. 

(The following two programs will not actually 'do' anything other than print words on 
the screen, and you therefore need not bother typing them in. They have been 
included to demonstrate the way that sub-routines can perform repeated tasks.) 

For example, in the following program: 



10 MODE 2 [ENTER] 

20 PRINT "This old man he played one" [ENTER] 

30 PRINT "He played knick-knack on my drum" [ENTER] 

40 PRINT "With a knick-knack paddy wack" [ENTER] 

50 PRINT "Give a dog a bone" [ENTER] 

60 PRINT "This old man came rolling home" [ENTER] 

70 PRINT [ENTER] 

80 PRINT "This old man he played two" [ENTER] 

90 PRINT "He played knick-knack on my shoe" [ENTER] 

100 PRINT "With a knick-knack paddy wack" [ENTER] 

110 PRINT "Give a dog a bone" [ENTER] 

120 PRINT "This old man came rolling home" [ENTER] 

130 PRINT [ENTER] 

140 PRINT "This old man he played three" [ENTER] 

150 PRINT "He played knick-knack on my knee" [ENTER] 

180 PRINT "With a knick-knack paddy wack" [ENTER] 

190 PRINT "Give a dog a bone" [ENTER] 

200 PRINT "This old man came rolling home" [ENTER] 

210 PRINT [ENTER] 

run [ENTER] 



Foundation Course Chapter 1 Page 31 



....you can see a number of lines which have to be repeated at various points in the 
program, for example the chorus at line 180. Let's make that chorus into a 
sub-routine and add the instruction RETURN at the end. Then, we'll call the 
sub-routine using the command GOSUB 180 whenever we want to use it. The 
program now looks like this: 



10 MODE 2 [ENTER] 

20 PRINT "This old man he played one" [ENTER] 

30 PRINT "He played knick-knack on my drum" [ENTER] 

40 GOSUB 180 [ENTER} 

80 PRINT "This old man he played two" [ENTER] 

90 PRINT "He played knick-knack on my shoe" [ENTER] 

100 GOSUB 180 [ENTER] 

140 PRINT "This old man he played three" [ENTER] 

150 PRINT "He played knick-knack on my knee" [ENTER] 

160 GOSUB 180 [ENTER] 

170 END [ENTER] 

180 PRINT "With a knick-knack paddy wack" [ENTER] 

190 PRINT "Give a dog a bone" [ENTER] 

200 PRINT "This old man came rolling home" [ENTER] 

210 PRINT [ENTER] 

220 RETURN [ENTER] 

run [ENTER] 



See how much tedious typing we'd have saved ourselves? Well designed sub-routines 
are a principal part of computing. They lead to 'structured' programs, and develop 
good programming habits. 

Always bear in mind when writing sub-routines, that you do not necessarily have to 
'jump into' the sub- routine at the same point, i.e. its beginning. A sub-routine written 
from lines 500 to 8 can be called by: GOSUB 500, or GOSUB 640, or GOSUB 
790. 

Note in the above program, that the instruction END is used in line 1 70, Otherwise 
the program would naturally continue after line 1 6 0, and would carry out line 180, 
which is NOT required unless called by G S U B . 
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Simple Arithmetic 

Your computer can be used as a calculator quite easily. 

To understand this, carry out the following examples. We will use the ? symbol 
instead of typing print in this section. The answer will be printed as soon as the 
[ENTER] key is pressed. 

Addition 

(use [SHIFT] and ; keys for plus) 
Type: 

?3 + 3 [ENTER] 
6 

(Note that you do NOT type in the equals sign =) 
Type: 

?8 + 4 [ENTER] 

12 

Subtraction 

(use unshifted - key for minus) 
Type: 

?4-3 [ENTER] 

1 

Type: 

?8-4 [ENTER] 

Multiplication 

(Use [SHIFT] and : keys formultiply(* means x) 

Type: 

?3*3 [ENTER] 
9 

Type: 

?8*4 [ENTER] 
32 
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Division 

(use unshifted ? key for divide (/ means h-} 
Type: 

?3/ 3 [ENTER] 

■1 
Type: 

?8/4 [ENTER] 
2 

Integer Division 

(use \ for division with removal of the remainder) 

Type: 

?10\6 [ENTER] 
1 



Type: 



?20\3 [ENTER] 
6 



Modulus 

( use M D to obtain the remainder portion after integer division) 
Type: 



?10 HOD 4 
2 


Type: 


?9 HOD 3 



Square Root 



To find the square root of a number, use s q r ( ) . The number that you want the 
square root of should be typed inside the brackets. 

Type: 

?sqr(16) [ENTER] (this means V16) 
4 
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Type: 



?sqr (100) [ENTER] 
10 



Exponentiation 

(use unshifted £ key for exponentiation) 

Exponentiation is when a number is raised to a power of another. For example 3 
squared (3 2 ),3 cubed (3 3 ) etc. 



Type: 



? 3 t 3 [ENTER] (this means 3 3 ) 
27 



Type: 



? 8 t * [ENTER] (this means 8 4 ) 
4096 



Cube Root 

You can quite easily calculate cube roots by using a similar method to the last 
example. 

Tofindthecuberootof27( 3 V27) 
Type: 

?27| (1/3> [ENTER] 
3 

To Find the cube root of 125 

Type: 

7125 t d/3) [ENTER] 

5 
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Mixed Calculations 

Mixed calculations are understood by the computer, but they are calculated within 
certain priorities . 

First priority is given to multiplication and division, then addition and subtraction. 
These priorities apply only to calculations containing only these four operations. 

If the calculation was: 

3+7-2*7/4 

You may think this would be calculated as: 

3+7-2 *7 /4 
= 8 *7 /4 

= 56/4 
= 14 

In fact it is calculated as: 

3+7-2*7/4 
=3+7-14/4 
=3+7-3.5 
=10-3.5 
= 6.5 

Prove this by typing in this calculation as it is written: 

Type: 

73 + 7-2*7/4 [ENTER] 
6.5 

You can change the way the computer calculated this by adding brackets. The 
computer will deal with the calculation inside brackets prior to the multiplication 
etc, outside the brackets. Prove this by typing in the calculation including brackets. 



Type: 



?C3 + 7-2)*7/4 [ENTER] 

14 
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The priority of ALL mathematical operators is as follows: 

| Exponentiation 

MOD Modulus 

Unary minus (declares a number as negative) 
* and / Multiplication and division 
\ Integer division 

+ and - Addition and Subtraction 

Further Exponents 

If you want to use very large or very small numbers in calculations, it is sometimes 
useful to use scientific notation. The letter E is used for the exponent of numbers to 
the base 10. You may use either lower case e or upper case E . 

For example 300 is the same as 3xl0 2 . In scientific notation, this is 3 E 2 , Similarly, 
0.03 is the same as 3xl0" 2 ). In scientific notation this is 3E-2. Try the following 
examples. 

You can type in: 

7 30*10 [ENTER] 
300 

or you can type: 

?3E1*1E1 [ENTER] 
300 

73000*1000 [ENTER] ....or... ?3E3*1E3 [ENTER] 
3000000 

73000*0.001 [ENTER] ...or... ?3E3*1E-3 [ENTER] 
3 
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Part 7: Save It.... 



Now that you've exercised your fingers by typing in a few instructions, you'll 
probably want to know how to save a program from the computer onto disc, and how 
to load it back from disc into the computer. 

Even if you are familiar with cassette saving and loading, it is worth pointing out 
some important information which must be observed when dealing with disc 
program files. 

The 2 most apparent differences will be that firstly, a new blank disc cannot simply be 
taken out of its wrapper and recorded onto, as is the case with cassettes. A new disc 
must be first be 'formatted', and this process will be explained in a moment. 

The other point worth mentioning here, is the importance of correctly 'naming' disc 
files. Cassette filenames generally conform to very loose standards, varying greatly 
in length, being at times omitted. Not so with discs. Disc filenames must conform 
strictly to CP/M standards, and will be explained later in this section. 

Formatting discs for use 

Before writing any data onto a new blank disc, the disc itself must first be formatted. 
Formatting can be likened to building a series of shelves and dividers onto a disc prior 
to the storage of information on those shelves; in other words, laying down an 
organised framework around which data can be put in or taken out. 

Formatting divides the disc into 360 distinctly separate areas: 

Track 39 



■* — — Outer Case 




Sector 



Track 
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There are 40 tracks from the outside of the disc (Track 0), to the inside (Track 39), and 
the circumference of the disc is divided into 9 sectors. 

Each track in a sector can store up to 512 bytes of data; hence the total available space 
on each side of a disc is 180 Kbytes. 



First Steps Using the CP/M Disc 

To prepare a new blank disc for reading and writingyour own programs onto, you will 
need to format using the CP/M disc. 

Switch the system on, and insert the CP/M disc supplied, into the drive. 

If you are operating 2 disc drives, always insert the CP/M disc into the main disc drive 
within the computer (Drive A.) 

Type in: 

Icpm [ENTER] 

(You will find the bar symbol I by holding down [SHIFT] and pressing the 3 key.) 
After a few seconds you will see the following message on the screen: 

CP/M ' 2 . 2 - Amstrad Consumer Electronics pic 
A> 

This is a 'Sign on' message indicating that the operating system is under the 
control of CP/M. 

The displayed A > on the screen is a prompt, (similar to R e a d y during normal BASIC 
operation) indicating that the computer is awaiting your instructions. 

Once you are operating CP/M, you cannot enter BASIC commands into the computer, 
as these will not be understood. 

If for example, you type in the BASIC command: 

els [ENTER] 
The Computer will return your entry, together with a question mark: 

CLS? 
indicating that it does not understand your command. 
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To briefly look at some of the CP/M commands, type in: 

d i r [ENTER] 

On the screen you will see a directory of CP/M and utility C Mmands, one of which is 
f o r m a t . Type in: 

format [ENTER] 

On the screen you will see: 

Please insert disc to be formatted into drive A 
then press any key . 

Remove the CP/M disc and insert your new blank disc, then press any key (any grey 
key). Formatting will start, commencing at Track and ending at track 39, after 
which you will be asked on the screen: 

Do you want to format another disc (Y/N): 

If you wish to format the other side of your blank disc, or format another disc, type Y 
(for Yes) and you will receive the initial message once again. 

The formatting process can be repeated any number of times until you answer the 
repeat question N (for No), whereupon the system will ask you to: 

Please insert a CP/M system disc into drive A 
t hen press any key : 

After doing so, the computer will return you to the direct CP/M mode, and will await 
your next command. Other CP/M commands will be dealt with later in this manual 
but for now, having learnt to format with CP/M, reset the computer using [CTRL] 
[SHIFT] [ESC]. 

Always keep a master copy of your CP/M disc in a safe place, as it is literally the key to 
your system. Later in this manual, you will be shown how to make a 'working copy' of 
your CP/M disc, so that you can keep your master copy safely locked away! 

BEWARE 

FORMATTING A PREVIOUSLY RECORDED DISC WILL ERASE ITS CONTENTS. 

You will not be able to format a disc which has its write protection hole open. 
Attempting to do so will result in the message on the screen: 

Drive A: disc is write protected 
Retry, Ignore or Cancel? 
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Press C to cancel, then follow the instructions on the screen. The format mode will 
then be abandoned. 

Now that we have a formatted blank disc (or two), we can start to manipulate BASIC 
programs to and from disc. 



Saving a Program in Memory onto Disc 

Having typed a program into the computer's memory, save it onto disc by typing in: 
save "f i tename" [ENTERJ 

Note that the naming of the program is obligatory. 

A filename on disc consists of 2 parts (fields). The first part is obligatory and can 
contain up to 8 characters. Letters and numbers may be used but NO spaces or 
punctuation marks. This first field usually contains the name of the program. 

The second field is optional. You can use up to 3 characters, but again no spaces or 
punctuation. The 2 fields are separated by a dot . 

If you do not specify a second field, the system will automatically label it with a token 
of its own, such as . B A S for BASIC files or . B I N for binary (machine code) files. 

As an example of saving to disc, write a short program into the memory, insert a 
formatted disc, then type in: 

save "example" [ENTER] 

After a few seconds, the prompt Ready will appear on the screen, and the program 
will have been saved onto disc. (If not, check any error message on the screen to 
establish whether you either forgot to insert your disc into the correct drive, forgot to 
close the write protect hole, or mistyped the command.) 

Catalog 

After saving the above program, type in: 

cat [ENTER] 

On the screen you will see: 

Dr i ve A : user 
EXAMPLE. BAS IK 
168K free 
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The filename will be displayed, including any specified or token second field, together 
with the file length (to the nearest higher Kbyte). The amount of free space on the disc 
will also be displayed. 



Loading from Disc 

Programs may be loaded from disc then run, using the commands: 

Load "f i Lename" [ENTER] 
run [ENTER] 

... .or they may be run directly using the command: 

run "f i Lename" [ENTER] 

Note that protected programs may be run directly only. 

lAand IB 

If you are operating an additional disc drive, you may specify which Drive (A or B) 
that you require a function to be performed on by typing in: 

la [ENTER] 

or 

lb [ENTER] 
....before issuing the SAVE, CAT, or LOAD commands. 

Copying Programs from Disc to Disc 

Using the commands already learnt in this section, it can be seen that disc to disc 
program copying is performed simply by loading the program into the memory from 
the original (source) disc, removing the source disc, and saving the program onto the 
new (destination) disc. 

To save a program from disc to disc using 2 disc drives, you may prefer to insert your 
source disc into, for example, Drive B, and your destination disc into Drive A. To copy 
a program in this way, type in: 
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lb [ENTER] 

Load "filename" [ENTER] 

la [ENTER] 

save "f i lename" [ENTER] 

There are four ways in which files may be SAVEd by the CPC664. In addition to 
ordinary BASIC file saving, by: 

save "f i Lename" [ENTER] 

....there are three alternative methods, for more specialised purposes. . 

save "f i Lename",a [ENTER] 

Adding the suffix , a instructs the computer to save the program or data in the form 
of an ASCII text file. This method of saving data applies to files created by 
wordprocessors and other applications programs, and its use will be further discussed 
as applications are encountered. 

save "f i Lename", p [ENTER] 

Adding the suffix , p tells the computer to protect the data so that the program 
cannot be LI S Ted after LOADingit,or RUNningitthen stopping its execution using 
the [ESC] key function. 

Programs saved in this way can only be run directly, using the commands: 

run "f i Lename" [ENTER] 
....or.... 

chain "f i Lename" [ENTER] 

If you anticipate wanting to edit or alter the program, you should also keep a copy for 
yourself in unprotected form, i.e. without the , p suffix. 

save "fi Lename", b, -starting address* , 'length in bytes> 

[, -optional entry point'! [ENTER] 

This option allows you to perform a binary save where a complete block of data in the 
computer's RAM is stored onto disc exactly as it occurs in the memory. It is necessary 
to instruct the computer where the section of memory you need to save starts, how 
long it is, and if required, the memory address at which to start execution should the 
file be run as a program. 
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This binary save feature allows data from the screen memory to be stored directly 
onto disc in the form of a screen dump. The contents of the screen will be saved exactly 
as it is seen, using the command: 

save "scrndump",b, 49152,16384 [ENTER] 

....where 491 52 is the starting address of the screen memory, and 16384 is the 
length of the screen memory that you wish to save. 

To call it back onto the screen, type in: 

Load "scrndump" [ENTER] 

More information on using the system to manipulate program files between discs 
(and cassette), will be found later in this manual. 

Finally, eheck that you have observed the following warnings given at the beginning 
of this manual, in the section entitled 'IMPORTANT': 

INSTALLATION NOTES 5,6,7 
OPERATION NOTES 1,2,3,4,5,6,7,9 
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Part 8: Understanding Modes, 
Colours and Graphics.... 



The Amstrad CPC664 Colour Personal Computer has three modes of screen display 
operation: ModeO, Mode 1, and Mode 2. 

When the computer is first switched on, it is automatically in Mode 1. 

To understand the different modes, switch on the computer and press the number 1 
key. Hold it down until two lines are full of 1 's. If you now count the number of 1 's on a 
line, you will see that there are 40. This means that in Mode 1, there are 40 columns. 
Press [ENTER] - you will get aSyntax error message, but don't worry, this is just 
a quick way of getting back to the Ready message that tells you the computer is 
waiting for your next instruction . 

Now type in: 

mode [ENTER] 

You will see that the characters on the screen are now larger. Press the number 1 key 
again and hold it down until two lines are full of 1 's. If you count the number of 1 's on 
a line, you will see there are 20. This means that in Mode 0, there are 20 columns. 
Press [ENTER] again. 

Now type in: 

mode 2 [ENTER] 

You will see that this is the smallest mode, and if you again type in a line of 1 's, you 
will count 80. This means that in Mode 2 there are 80 columns. 

To recap: 

Mode = 20 columns 
Mode 1 = 40 columns 
Mode 2 = 80 columns 

Finally, press [ENTER] once again. 
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Colours 

There is a choice of 27 colours. These are shown on a green monitor (GT65) as various 
shades of green. If you purchased the GT65 monitor, you can buy the AMSTRAD MP2 
Modulator/Power supply in order to use the computer's colour facilities on your 
domestic colour T.V, 

In Mode 0, up to 16 of the 27 available colours can be put onto the screen at any time. 
In Mode 1 , up to 4 of the 27 colours can be put onto the screen at any time. 
In Mode 2, up to 2 of the 27 colours can be put onto the screen at any time. 

You are able to change the colour of the BO R D E R, the P A P E R (the area where the 
characters can appear) or the PEN (the character itself), all independently of each 
other. 

The 27 colours available are listed in Table 1, each with their INK colour reference 
number. 

For convenience, this table also appears on the panel at the top right hand side of the 
computer. 

MASTER COLOUR CHART 



Ink 




Ink 




Ink 




No. 


Colour/Ink 


No. 


Colour/Ink 


No. 


Colour/Ink 





Black 


9 


Green 


18 


Bright Green 


1 


Blue 


10 


Cyan 


19 


Sea Green 


2 


Bright Blue 


11 


Sky Blue 


20 


Bright Cyan 


3 


Red 


12 


Yellow 


21 


Lime Green 


4 


Magenta 


13 


White 


22 


Pastel Green 


5 


Mauve 


14 


Pastel Blue 


23 


Pastel Cyan 


6 


Bright Red 


15 


Orange 


24 


Bright Yellow 


7 


Purple 


16 


Pink 


25 


Pastel Yellow 


8 


Bright Magenta 


17 


Pastel Magenta 


26 


Bright White 



Table 1 : The INK numbers and colours 

As explained earlier, when the computer is first switched on, it is in Mode 1. To return 
to Mode 1 from a different mode, type in: 

mode 1 [ENTER] 
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The screen display 




PEN 

BORDER 
PAPER 



The BORDER is the area surrounding the PAPER. (Note that when the computer is 
first switched on, the BORDER and PAPER are both blue). The characters on the 
screen can only appear inside the border. The P A P E R is the background area behind 
a character, while the PEN writes the character itself. 

Now we will explain how the colours that you see on the screen are selected, and how 
you can change these to your own choice. 

When you first switch on, or reset the computer, the B R D E R is always set to colour 
number 1 . Look up number 1 on the master colour chart, and you will see that colour 
number 1 is blue. The colour of the border can be changed by using the command: 
BORDER followed by the colour number. To change the border to white, type in: 

border 13 [ENTER] 

So far, so good. Now for the tricky bit.... 

When you first switch on, or reset the compute ^ PAPER number , and PEN number 
1 areal w jtysaja tpjn.aticallV-aeJ.e^tejJ. This does NOT mean that you look up numbers 
U and 1 onthe master colour chart and away you go.. . . 

The important thing to remember is that and 1 are PAPER and PEN numbers; 
thexare NOT ink.cplour numbers. To understand this, imagine having 4 pens on your 
desknumbered 0, 1,2, and 3, and being able to fill each of these pens with any colour of 
your choice out of 27 bottles of ink, numbered to 26. It can be seen therefore, that pen 
number 1 is not necessarily always the same colour; as it can be filled with a different 
ink, in fact you could fill each of the 4 pens with the same ink. 
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So it is with the computer. Using the PEN and INK commands, you can select the pen 
number, and then the ink colour for that pen. 

Remembering that we are operating in Mode 1 (40 columns), look at Table 2 below, 
and you will see from the first and third columns, that PEN number 1 corresponds to 
INK colour number 24. Now look up I NK number 24 on the master colour chart 
(Table 1) and you will see that the colour listed is bright yellow, i.e. the colour of the 
characters on the screen when you first switch on. 



DEFAULT SETTINGS 



Paper/Pen No. 


Ink Colour 

ModeO 


Ink Colour 
Model 


Ink Colour 
Mode 2 



1 
2 


1 *\ 

24 

20 




24, ^U 

20 1 ' 


24 J 


3 


6 




6 J 


4 


26 




\"\ 


24 i 
24 J 


5 
6 

7 


. i-~ 

2 ^ 


24 V 

20 \ 
6 / 


8 


10 ; 




1 


1 


9 


12 ; 




24 


24 


10 


14 ; 




20 f 


1 


11 


16 ; 




6 .'■ 


24 


12 


18 i 




i] 


1 


13 


22 | 




"I 


24 


14 


Flashing 1,24 


20 { 


U 


15 


Flashing 


16,11 


6 j 


24) 



1 



Table2:PAPER/PEN/MODE/INKreference 



Chapter 1 Page 48 



Foundation Course 



/» » r .'U 



/, '■ s )■■■.'■■*; & t %LL ./^Ai«f,,.' 1 .<jj.:i ,.-.'.<..,- ■ .- ■■• - : <,..;- <f-:'j.- h' ■■>., 



&/jL 



J- i 



tub / t £P ~4<fzf^j fx,T. /- fU \/\ 






The PAPER/PEN/ INK relationships given in Table 2 are not fixed however. They are 
the default settings when you switch-on or reset the computer. You can change them 
by using the INK command. The command has two parts (or 'parameters'). The first 
part is the number of the PAPER or PEN that you are going to fill with ink, and the 
second part is the colour of the ink itself. The two parts of the command are separated 
by a comma , 

So, now that we know that we are using PEN number 1 , let's change the colour of the 
I N K in that pen, to orange. 

Typein: . ,kV \^~ 

ink 1,15 [ENTER] 

....and you will see that the characters on the screen have changed colour. 

The background colour can also be changed using the INK command. We know that 
PAPER number is selected at switch on, so let's change the colour of the I N K in 
PAPER number to green (colour number 9) by typing in the command: 

ink 0,9 [ENTER] 

Now let's use a different pen altogether. Type in: 

pen 3 [ENTER] 

Notice how only the colour of the new characters (after the command) changes. 
You're using PEN number 3 now, and you will see from Tables 1 and 2 that the INK 
initially loaded into PEN number 3 is colour number 6 (bright red). Change it to pink 
by typing in: 

ink 3,16 [ENTER] 

Remember, 3 is the colour of the pen that you selected earlier with the command: 
pen 3 , and that 1 6 is the ink colour - pink. 
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Now let's change to a new paper. When a new paper is selected, the previous 
background colour behind the characters will NOT change because that colour was 
'printed' by a different P A P E R . To see this, type in: 

paper 2 [ENTER] 

Once again use Tables 1 and 2 to see why the background colour for P A P E R number 
2 is bright cyan. Change it to black by typing in: 

ink 2,0 [ENTER] 

On the screen now, we have characters written by PEN numbers 1 and 3, on a 
background of P A P E R numbers and 2. I N Ks can be changed inaPENorPAPER 
that you are not currently using. For example, type in: 

ink 1,2 [ENTER] 

....which changes the colour of all the previous characters typed in with PEN 
number 1 . 

Type in: 

els [ENTER] 

....to clear the screen. 

It should now be possible for you to instruct the computer to return to its original 
colours (blue border and background with bright yellow characters) using the 
BORDER, PAPER, PEN, and INK commands. See if you can do so. If you can't, then 
reset the computer using the [CTRL] [SHIFT] and [ESC] keys. 



Flashing Colours 

It is possible to make the colour of the characters flash between one colour and 
another. This can be achieved by adding an extra colour number to the INK 
command of the PEN. 

To see the characters on the screen flashing between bright white and bright red, 
reset the computer using [CTRL] [SHIFT] [ESC], and type in: 

ink 1,26,6 [ENTER] 
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In this case, 1 is the PEN number, while 2 6 is the colour bright white, and 6 is the 
alternate colour, bright red. 

It it, also possible to make the colour of the PAPER behind the characters flash 
between one colour and another. This can be achieved by adding an extra colour 
number to the INK command for the PAPER. 

To see the PAPER flashing between green and bright yellow behind the characters, 
type in: 

ink 0,9,24 [ENTER] 

In this case is the PAPER number, while 9 is the colour green, and 2 4 is the 
alternate colour bright yellow. 

Now reset the computer using [CTRL] [SHIFT] [ESC] 

Note from Table 2 that in mode 0, two of the PE N.s (numbers 1 4 and 1 5 ), together 
with two of the PA PERs (numbers 1 4 and 1 5) are default flashing colours. In other 
words, their INK commands have been pre-programmed with an extra colour 
parameter. 

Type in the following; 

mode [ENTER] 
pen 15 [ENTER] 

on the screen you will see the word Ready flashing between sky blue and pink. 
Now type in: 

paper U [ENTER] 
cLs [ENTER] 

You will now see that in addition to the word Ready flashing between sky blue and 
pink, the background P A P E R is also flashing between yellow and blue. 

PEN and PAPER numbers 14 and 15 may be re-programmed using the INK 
command to other flashing colours, or to one steady colour. 

Finally, it is possible to make the BORDER flash hetween two colours by adding an 
extra colour number to the BORDER command. Type in: 

border 6,9 [ENTER] 

You will now see that the BORDER is flashing between bright red and green. Note 
that the border may be set to any one, or pair of the 27 colours, regardless of whether 
you are operating in mode 0, 1, or 2. 

Now reset the computer using [CTRL] [SHIFT] [ESC] 
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For further demonstration of the colours available, type in the following program, 
then r u n it. 

10 MODE [ENTER] 

20 rate=600: REM sets speed of program [ENTER] 

30 FOR b = TO 26 [ENTER] 

40 LOCATE 3,12 [ENTER] 

50 BORDER b [ENTER] 

60 PRINT "border colour ";b [ENTER] 

70 FOR t = 1 TO rate [ENTER] 

80 NEXT t,b [ENTER] 

90 CLG [ENTER] 

100 FOR p = TO 15 [ENTER] 

110 PAPER p [ENTER] 

120 PRINT "paper";p [ENTER] 

130 FOR n = TO 15 [ENTER] 

140 PEN n [ENTER] 

150 PRINT "pen";n [ENTER] 

160 NEXT n [ENTER] 

170 FOR t = 1 TO rate*2 [ENTER] 

180 NEXT t,p [ENTER] 

190 MODE 1 [ENTER] 

200 BORDER 1 [ENTER] 

210 PAPER [ENTER] 

220 PEN 1 [ENTER] 

230 INK 0,1 [ENTER] 

240 INK 1,24 [ENTER] 

run [ENTER] 



IMPORTANT 

In the above program, and in later chapters and listings in this manual, BASIC 
keywords will appear in upper case (CAPITAL) letters. This is how keywords 
appear when a program is LIS Ted by the computer. In general it is preferable 
that you type instructions or programs using lower case (small) letters, since it will 
help you spot typing mistakes when LISTing the program - (because the 
mis-typed BASIC keyword will NOT be converted to upper case). 

For the remainder of this Foundation course, we will list programs in both upper 
and lower case, so that you get accustomed to this aspect of operation. 

A variable's name, such as x or a $, will NOT be converted to upper case when the 
program is L I S Ted although the computer will recognise the name regardless of 
whether it appears in upper or lower case in the program. 

Attention 

From this point in the manual, you will not be instructed to press the [ENTER] key 
after each line. Therefore it is assumed that you will do it automatically. 
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Graphics 



There are a number of character symbols in the computer's memory. To print any one 
of these, we use the keyword: 

chr$( ) 

Inside the brackets should be the symbol number, which is in the range from 32 to 
255. 

Reset the computer, [CTRL] [SHIFT] [ESC], then type in: 

print c hr$ C 250) 

Don't forget to press [ENTER]. On the screen you will see character number 250, 
which is a man walking to the right. 

To see all the characters and symbols appear on the screen together with their 
associated numbers, type in the following program, once again remembering to press 
[ENTER] after each line. 

10 for n = 32 to 255 
20 print n; chr$Cn); 
30 next n 
run 

For your reference, the range of characters together with their respective numbers 
appear in the chapter entitled 'For your reference... .'. 



LOCATE 

This command is used to reposition the character cursor to a specified part of the 
screen. Unless changed by the locate command, the character cursor starts at the top 
left corner of the screen, which corresponds to x,y co-ordinates 1,1 (x is the horizontal 
position and y is the vertical position). In mode 1 there are 40 columns and 25 lines. 
Therefore, to position a character in the centre of the top line in mode 1, we would use 
20,1 as the x,y co-ordinates. 

To see this, type in: (remember to [ENTER] each line) 

mode 1 . . . .screen clears, cursor moves to top left. 

10 Locate 20,1 

20 print chr$C250) 

run 
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Just to prove that this is on the top line, type in: 

border 

The BORDER will now be black and you will see the man at the middle of the top line 
of the screen. 

In mode 0, there are only 20 columns, but the same 25 lines. If you now type in: 

mode 
run 

....you will see that the man now appears at the top right corner of the screen. This 
happens because the x co-ordinate 20, is the last column in mode 0. 

In mode 2, there are 80 columns and 25 lines. Using the same program, you will 
probably be able to guess where the man will appear. Type in: 

mode 2 
run 

Return to mode 1 by typing in: 

mode 1 

Now experiment for yourself, modifying the Locate and c h r $ ( ) numbers to 
position various characters anywhere on the screen. Just for example, type in: 

Locate 20,12:print chr$(240) 

You will see an arrow in the centre of the screen. Note that in this instruction: 

2 was the horizontal (x) co-ordinate (in the range 1 to 40) 

1 2 was the vertical (y) co-ordinate (in the range 1 to 25) 

240 was the character symbol number (in the range 32 to 255) 

To get the character symbol 250 to be repeated across the screen, type in the following 
program: 

10 CLS 

20 FOR x=1 TO 39 

30 LOCATE x,20 

50 PRINT CHR$(250> 

60 NEXT x 

70 GOTO 10 

run 

Press [ESC] key twice to break. 
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In order to remove the previous character from the screen before printing the next 
character, type in: 

50 print " ";chr$(250) 

(Thisnewline 50 automatically replaces the previously typed in line 50.) 
Now type in: 

run 

FRAME 

To improve the movement of the character across the screen, add the following line: 
40 frame 

The FRAME command synchronises the movement of objects on the screen to the 
display frame scanning frequency. If that's a bit technical for you, just remember that 
the command should be used whenever you want to move characters or graphics 
around the screen smoothly. 

This program can be further enhanced to improve the movement by adding some 
delay loops and by using a different returning character symbol. 

Type in: 

List 
Now add the following lines to the program: 



70 FOR n=1 TO 300:NEXT n 

80 FOR x = 39 TO 1 STEP -1 

90 LOCATE x,20 

100 FRAME 

110 PRINT CHR$<251>;" " 

120 NEXT x 

130 FOR n=1 TO 300:NEXT n 

140 GOTO 20 

run 
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PLOT 

Unlike the LOCATE command, PLOT may be used to determine the position of the 
graphics cursor, using pixel co-ordinates. (A pixel is the smallest possible segment of 
the screen). 

Note that the graphics cursor is not visible and is different from the character cursor, 

There are 640 horizontal pixels by 400 vertical pixels. The x,y co-ordinates are 
positioned with respect to the bottom left corner of the screen, which has x,y 
co-ordinates of 0,0. Unlike the LOCATE command used for characters, the 
co-ordinates do not differ between modes 0, 1, or 2. 

To see this, first reset the computer using [CTRL] [SHIFT] [ESC], then type in: 
plot 320,200 

A small dot will appear in the centre of the screen. 
Now change the mode by typing in: 

mode 

plot 320,200 

You will see the dot is still in the centre but is now larger. Change the mode again and 
type in the same command to see the effect in mode 2: 

mode 2 

plot 320,200 

The dot is still in the centre, but is now much smaller. 

Plot several dots over the screen in various modes, in order to accustom yourself with 
this command. When you have finished, return to mode 1 and clear the screen by 

typing in: 

mode 1 

DRAW 

First reset the computer using [CTRL] [SHIFT] [ESC]. The DRAW command draws a 
line from the current graphics cursor position. To see this in more detail, draw a 
rectangle on the screen by using the following program. 

We start by repositioning the graphics cursor with a P L T command, then D R A Wing 
a line from the graphics cursor position, up towards the top left corner, then from 
there to the right corner etc, etc. Type in: 
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5 els 

10 plot 10,10 
20 draw 10,390 
30 draw 630,390 
40 draw 630,10 
50 draw 10,10 
60 goto 60 
run 

Press [ESC] twice to break from this program. 

(Notice line 60 of this program; the computer is told to 'loop' around line 60 again 
and again, until you 'break' from the program by pressing [ESC] twice. This sort of 
instruction is useful if you do not want the computer to automatically Tareak' at the 
end of a program and display the Ready prompt that usually appears on the screen.) 

Now add the following lines to the program, to draw a second rectangle inside the 
first. Type in: 

60 plot 20,20 
70 draw 20,380 
80 draw 620,380 
90 draw 620,20 
100 draw 20,20 
110 goto 110 
run 

Again, press [ESC] twice to break from this program. 

MOVE 

The HOVE command operates in a similar manner to PLOT, in that the graphics 
cursor is moved to the position specified by the x,y co-ordinates; however the pixel 
(dot) at the new graphics cursor location is NOT plotted. 

Type in: 

c Is 

move 639,399 

Although we can see no sign of it on the screen, we have moved the graphics cursor to 
the top right corner. 

Let's prove it by drawing a line from that position to the centre of the screen, by 
typing in: 

draw 320,200 
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Circles 

Circles can either be plotted or drawn. One method of forming a circle is to plot the 
x,y, co-ordinates of each point on the circumference of a circle. Refer to the diagram 
below and you will see that point 'p' on the circumference can be plotted using x and y 
co-ordinates. These are: 

x=190*cos(a) 
y=190*sin(a) 




Plotting the points of a circle. 

In previous programs we have plotted points with respect to the bottom left corner of 
the screen. If we wanted to position a circle in the centre of the screen we would have 
to plot the centre of the circle at co-ordinates 320,200 then position all points of the 
circle relative to the centre position, by adding on the centre position co-ordinates. 

A program to plot a circle would then be like this. Type in: 



new 

10 

20 

30 

40 

50 

60 

run 



CLS 

DEG 

FOR a=1 TO 360 

MOVE 320,200 

DRAW 320 + 190*COS(a) J ,200 + 190*SIN(a> 

NEXT 
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Note the use of the keyword NEW before typing in the program above. This tells the 
computer to clear any program in the memory (in a similar manner to [CTRL] [SHIFT] 
[ESC]). However the screen itself is not cleared. 

The radius of the circle can be reduced by lowering the 190 figure (190 refers to 
pixels). 

To see the effect of the circle being plotted differently (in radians), delete line 2 from 
the program by typing in: 

20 

To see a solid circle drawn by lines from the centre, edit line 5 0, replacing the word 
plot with the word draw. (Line 50 will then be): 

50 draw 320 + 190*cos (a) ,200 + 190*s i n(a) 

Try this with and withoutline 20 again. 

You will note that line 6 of this program is NEXT instead of N E X T a . It is 
permissible to simply type 'NEXT' on its own; the computer will work out which F R 
expression the N E X T is to be associated with. In programs where there are numerous 
FOR and NEXT loops however, you may wish to add the variable's name after the 
word N E X T in order to identify the N E X T statement when studying the program. 



ORIGIN 

In the previous program we used the MOVE command to establish the centre of a 
circle, then added the x,y co-ordinates to this centre position. Instead of adding these 
centre co-ordinates to the point plotted, we can use the R I G I N command. This will 
position each of the x,y co-ordinates relative to the R I G I N . To see this type in: 



new 

10 cLs 

20 for a=1 to 360 

30 origin 320,200 

40 ptot 190*cos(a),190*sin(a) 

50 next 

run 
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To plot four smaller circles on the screen, type in the following program: 

new 

10 CLS 

20 FOR a=1 TO 360 

30 ORIGIN 196,282 

40 PLOT 50*COS(a) / 50*SINCa) 

50 ORIGIN 442,282 

60 PLOT 50*COS(a),50*SIN(a) 

70 ORIGIN 196,116 

80 PLOT 50*COS(a),50*SIN(a) 

90 ORIGIN 442,116 

100 PLOT 50*COS(a>,50*SIN(a) 

110 NEXT 

run 

To see a different way of creating a circle, type in the following program: 

new 

10 MODE 1 

20 ORIGIN 320,200 

30 DEG 

40 MOVE 0,190 

50 FOR a=0 TO 360 STEP 10 

60 DRAW 190*SIN(a),190*COS(a) 

70 NEXT 

run 

This time a line is D R A Wn from co-ordinate to co-ordinate around the circumference 
of the circle. Note how the circle is drawn much quicker than it is plotted. 

Once again observe the effect of removing the E G command, by deleting line 3 , 
then R U Nning the program again. 

FILL 

The FILL command is used to fill an area of the screen which is enclosed by drawn or 
edge of screen/graphics window boundaries. 

Reset the computer, [CTRL] [SHIFT] [ESC], then type in: 

new 

10 els 

20 move 20,20 

30 draw 620,20 

40 draw 310,380 

50 draw 20,20 

run 
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On the screen you will see a triangle. Move the graphics cursor to the centre of the 
screen by typing in : 

move 320,200 

Using the keyword FILL followed by a pen number, for example 3, we will now 
FILL the screen using the specified pen, from the current graphics cursor position 
(centre screen) to the drawn boundaries. Type in: 

f i LL 3 
Now move the graphics cursor outside the triangle by typing in: 

move 0/0 
See what happens when you type in: 

f i L t 2 

The computer has used pen number 2 to F I L L the area bounded by the drawn lines 
and by the edges of the screen. 

Now alter the program by typing in the following lines, and see what happens: 

50 draw 50,50 

60 move 320,200 

70 f i LL 3 
run 

You will note that any gaps in the drawn boundaries let the ink from the pen 'seep' 
through! 

This point is further demonstrated by F I L Ling first a plotted circle, then a drawn 
circle. Type in: 

new 

10 CLS 

20 FOR a=1 TO 360 

30 ORIGIN 320,200 

40 PLOT 190*COSCa),190*SINCa) 

50 NEXT 

60 HOVE -188,0 

70 FILL 3 

run 
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Now try: 

new 

10 MODE 1 

20 ORIGIN 320,200 

30 DEG 

40 MOVE 0,190 

50 FOR d = TO 360 STEP 10 

60 DRAW 190*SINCd),190*COSCd) 

70 NEXT 

80 HOVE -188,0 

90 FILL 3 

run 

We can make the outline of the circle to be filled invisible, by setting the pen ink to 
the same colour as the paper ink. Add: 

45 GRAPHICS PEN 2:INK 2,1 
run 

The GRAPHICS PEN command selects the pen to be used for drawing graphics on 
the screen. The INK command then specifies the ink colour for that pen, which in this 
case, is the same as for the paper (i.e. colour number 1 ), 



Further details.... 

For a more comprehensive guide to graphics on the CPC664, see the section 
'Graphically speaking' in the chapter entitled 'At your leisure....'. 

To conclude this section, here are a few graphics demonstration programs which 
incorporate a lot of the programming commands and keywords that you should now 
understand. Each of the programs draws continuous patterns on the screen. 

10 BORDER 0:GRAPHICS PEN 1 

20 m=CINT(RND*2) :M0DE m 

30 i1=RND*26:i2=RND*26 

40 IF ABSCi 1-i2)<10 THEN 30 

50 INK 0,i 1 :INK 1,i2 

60 s=RND*5+3:0RIGIN 320,-100 

70 FOR x= -1000 TO STEP s 

80 MOVE 0,0:DRAW x,300:DRAW 0,600 

90 MOVE 0,0:DRAW -x,300:DRAW 0,600 

100 NEXT:F0R t=1 TO 2000 : NEXT : GOTO 20 

run 
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10 MODE 1:BORDER 0:PAPER 

20 GRAPHICS PEN 2:INK 0,0:i=14 

30 EVERY 2200 GOSUB 150 

40 f Lag=0:CLG 

50 INK 2,14+RND*12 

60 b%=RND*5+1 

70 c%=RND*5+1 

80 ORIGIN 320,200 

90 FOR a=0 TO 1000 STEP PI/30 

100 x%=100*COS(a) 

110 MOVE x%,y% 

120 DRAW 200*COS(a/b%),200*SIN(a/c!;) 

130 IF fLag=1 THEN 40 

140 NEXT 

150 f Lag=1:RETURN 

run 



10 MODE 1:BORDER 0:DEG 

20 PRINT "Please wait" 

30 FOR n=1 TO 3 

40 INK 0,0:INK 1,26:INK 2,6:INK '3,18 

50 IF n=1 THEN sa=120 

60 IF n=2 THEN sa=135 

70 IF n=3 THEN sa=150 

80 IF n=1 THEN ORIGIN 0,-50,0,640,0,400 ELSE ORIGIN 0,0 

,0,640,0,400 
90 DIM cx<5),cy(5),r(5),U(5) 
100 DIM np(5) 

110 DIM pxX(5,81),pyJ£(5,81> 
120 st=1:cx(1>=320:cy(1)=200:r(1)=80 
130 FOR st=1 TO 4 
140 r(st+1)=r(st)/2 
150 NEXT st 
160 FOR st=1 TO 5 
170 LcCst)=0:np(st)=0 
180 np(st)=np(st)+1 

190 pxXCst,np(st)) = rCst)*SIN(U(st)> 
200 py%(st,np(st)) = r(st)*COSUc(st)) 
210 Lc(st)=Lc(st)+360/r(st) 
220 IF LcCst) < 360 THEN 180 

This program continues on the next page 
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230 px%(st,np(st)+1)=pxX(st,1) 

240 py2(st,np(st) + 1)=pynst,1) 

250 NEXT st 

260 CLS:cj=REMAIN(1):cj=REMAIN(2) 

270 cj=REMAIN(3) :INK 1,2:st=1 

280 GOSUB 350 

290 LOCATE 1,1 

300 EVERY 25,1 GOSUB 510 

310 EVERY 15,2 GOSUB 550 

320 EVERY 5,3 GOSUB 590 

330 ERASE cx,cy,r,lc,np,px%,py%:NEXT 

340 GOTO 340 

350 cxJJ = cx(st) :cy2=cy(st) : LcCst)=0 

360 FOR x*=1 TO np(st) 

370 MOVE cx%,cy% 

380 DRAW cx% + px%(st,x/;),cy% + py%Cst / x%),1 + (st MOO 3) 

390 DRAW cx%+pxX(st,x£+1),cy%+pyX(st,x%+1>,1+(st MOD 3) 

400 NEXT x% 

410 IF st = 5 THEN RETURN 

420 Lc(st)=0 

430 cx(st+1)=cx<st)+1.5*r(st)*SIN(sa+lc(st)) 

440 cy(st+1)=cy(st)+1.5*r(st)*COS(sa+Lc(st)) 

450 st=st+1 

460 GOSUB 350 

470 st=st-1 

480 Lc(st> = U(st)+2*sa 

490 IF CLcCst) HOD 360)<>0 THEN 430 

500 RETURN 

510 ik(1)=1+RND*25 

520 IF ik(1)=ik(2) OR ik(1)=ik(3) THEN 510 

530 INK 1,ik(1) 

540 RETURN 

550 ik(2)=1+RND*25 

560 IF ik(2)=ikC1) OR ik(2)=ik<3) THEN 550 

570 INK 2,ikC2) 

580 RETURN 

590 ik(3)=1+RND*25 

600 IF ik(3)=ik(1) OR ik(3)=ik(2> THEN 590 

610 INK 3,ik(3) 

620 RETURN 
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Part 9: Using Sound.... 



Sound is generated by a loudspeaker within the computer itself. If you are using an 
MP2 Modulator /Power supply and a domestic television, set the TV's volume control 
toaminimum. 

The level of sound can be adjusted by use of the VOLUME control on the right hand 
side of the computer. The sound can also be fed to the auxiliary input socket of your 
stereo system, using the socket on the computer marked STEREO. This will enable 
you to listen to the sound generated by the computer in stereo, through your hi-fi 
loudspeakers or headphones. Instructions on connecting to the computer's STEREO 
socket will be found in part 2 of this Foundation course. 



The SOUND Command 

The SOUND command has 7 parts ('parameters'). The first two of these must be used; 
the rest are optional . The command is typed in as: 

SOUND -channel status* , -tone period* , 'duration- , -volume- , < volume envelope* , 
<tone envelope* , -noise period* 

It looks pretty complicated, but if we analyse each parameter, we can soon get to grips 
with it. Let's look at the parameters one by one., , , 



Channel Status 

To keep things simple at the moment, regard the <channel status* as the reference 
number for the sound channel. There are 3 sound channels, and for now we will use 
the <channel status* number 1 . 

Tone Period 

<Tone period* is a technical way of defining the pitch of the sound, or in other words, 
'what note it is' (i.e. do re mi fa so, etc). Each note has a set number, and this number is 
the <tone period* . Refer to the chapter entitled 'For your reference. . . .', and you will see 
that the note middle c (do),has a tone period of 4 7 8 . 
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Now reset the computer [CTRL] [SHIFT] [ESC], and type in: 

10 sound 1,478 
run 

You will hear a short note which is middle c lasting 0.2 second. 

If you don't hear anything, make sure that the VOLUME control on the computer is 
not set to zero, then type RUN again. 

Duration 

This parameter sets the length of the sound, in other words, 'how long it lasts'. The 
parameter works in units of 0.01 {one hundredth) of a second, and if you don't specify 
the <duration>, the computer will assume a figure of 2 0, which is why the note you 
just heard lasted 0.2 second, i.e. 0.01 multiplied by 20. 

To make the note last for 1 second, a <duration> of 1 would be be used; to make it 
last 2 seconds, 200 would be used. Type in: 

10 sound 1,478,200 
run 

You will hear the note middle c lasting 2 seconds. 

Volume 

This parameter specifies the starting volume of a note. The number is in the range 
to 1 5. A <volume> figure of is minimum, while 1 5 is maximum. If no number is 
used, 1 2 is assumed. Type in: 

10 sound 1,478,200,5 
run 

Note the volume of this sound. Now type it in using a higher volume number: 

10 sound 1,478,200,15 
run 

You will hear that this is much louder. 
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Volume Envelope 

To make the volume vary within the duration of the note, you can specify a volume 
envelope using the separate command ENV. You can in fact make a number of 
different volume envelopes, and like the SOUND command, each has its own 
reference number. If you have created a volume envelope with a reference number of 
1 , and you wish to use it in a SOUND command, then where the parameter -volume 
envelope* is required, type in 1 . Creating a volume envelope will be explained 
shortly. 

Tone Envelope 

To make the tone or pitch vary within the duration of the note, you can specify a tone 
envelope using the separate command E N T . You can in fact make a number of 
different tone envelopes, and like the S U N command, each has its own reference 
number. If you have created a tone envelope with a reference number of 1 , and you 
wish to use it in a SOUND command, then where the parameter <tone envelope* is 
required, type in 1 . Creating atone envelope will be explained shortly. 

Noise 

■Noise* is the last parameter of the S U N D command. A range of noise is available by 
varying the noise* parameter between 1 and 3 1 . Add a <noise> parameter of 2 at the 
end of the SOUND command and listen to the effect. Then change the -noise* 
parameterto 27 and listen to the difference. Type in: 

10 sound 1,478, 200,15,, ,2 

Note the two "blank' parameters (,,,) before the -noise* parameter of 2. This is 
because we haven't created a -volume envelope* nor a -tone envelope*. 



Creating a Volume Envelope 

The volume envelope command is ENV. In its simplest form, the command has 4 
parameters: The command is typed in as: 

ENV -envelope number* , -number of steps- , <sizeofstep> , -timeperstep* 
As before, let's look at the parameters one by one. 
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Envelope Number 

This is the reference number (between and 1 5) given to a particular volume 
envelope so that it can be called up in the SOUND command. 

Number of Steps 

This parameter specifies how many different steps of volume you want the sound to 
pass through before it ends. For example, in a note which lasts 10 seconds, you may 
wish to have 10 volume steps of 1 second each. In such a case, the -number of steps> 
parameter used should be 10. 

The available range of -number of steps> is to 1 2 7 . 

Size of Step 

Each step can vary in size from a volume level of to 1 5 with respect to the previous 
step. The 16 different volume levels are the same as those you will hear in the SOUND 
command. However, the -size of step> parameter used can be between - 1 2 8 and 
+ 1 2 7; the volume level re-cyclingto0 after each 1 5. 

Time per Step 

This parameter specifies the time between steps in 0.01 second (hundredths of a 
second) units. The range of -time per step> numbers is to 2 5 5 , which means that the 
longest time between steps is 2,56 seconds (0 is treated as 2 5 6). 

Note therefore, that the -number of steps* parameter multiplied by the -time per step* 
parameter shouldn't be greater than the <duration> parameter in the SOUND 
command, otherwise the sound will finish before all the volume steps have been 
passed through. 

(In such a case, the remaining contents of the volume envelope are discarded.) 

Likewise, if the <duration> parameter in the SOUND command is longer than the 
•number of steps* multiplied by the -time per step> , the sound will continue after all of 
the volume steps have been passed through, and will remain constant at the final 

level. 

To experiment with the volume envelope, type in the following program: 

10 env 1,10,1,100 

20 sound 1,284,1000,1,1 

run 
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Line 2 specifies a S U N D with a tone period of 2 8 h (international a), lasting for 1 
seconds with a start volume of 1 , and using volume envelope number 1 , conisting of 
10 steps, raising the volume of each step by 1 , every 1 second (1 00 x 0.01 second). 

Change line 1 in each of the following ways and then run to hear the effect of 
changing the envelope: 

10 env 1,100,1,10 

10 env 1,100,2,10 

10 env 1,100,4,10 

10 env 1,50,20,20 

10 env 1,50,2,20 

10 env 1,50,15,30 

And finally try this: 

10 env 1,50,2,10 

You will notice that half way through the sound, the level remains constant. This is 
because the number of steps was 5 and the time between each step was 0.1 second. 
Therefore the length of time during which the volume varied was only 5 seconds, but 
the -duration> parameter in the SOUND command in line 20 was 1 000, i.e. 10 
seconds. 

Try experimenting yourself, to see what type of sounds you can create. 

If you wish to create a more intricate volume envelope, the 3 parameters: number of 
steps> , <size of step> , <time per step- may be repeated at the end of the ENV command 
up to 4 more times, to specify a different 'section' of the same envelope. 

Creating a Tone Envelope 

The tone envelope command is ENT. In its simplest form, the command has 4 
parameters: The command is typed in as: 

E N T <envelope number- , <numberof steps* , -tone period of step- , <time per step- 
Once again, let's look at the parameters one by one. 

Envelope Number 

This is the reference number (between and 1 5 ) given to a particular tone envelope 
so that it can be called up in the SOUND command. 
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Number of Steps 

This parameter specifies how many different steps of tone (pitch) you want the sound 
to pass through before it ends. For example, in a note which lasts 10 seconds, you may 
wish to have 10 tone steps of 1 second each. In such a case, the < number of steps> 
parameter used should be 1 . 

The available range of -number of steps* is to 2 3 9 . 

Tone Period of Step 

Each tone step can vary in the range -128to + 127 with respect to the previous step. 
Negative steps make the pitch of the note higher, Positive steps make the pitch of the 
note lower. The shortest tone period is 0. This must be remembered when 
formulating the tone envelope. The full range of tone periods is shown in the chapter 
entitled 'For your reference....'. 

Time per Step 

This parameter specifies the time between steps in 0.01 second (hundredths of a 
second) units. The range of -time per step> numbers is to 2 5 5 , which means that the 
longest time between steps is 2.56 seconds (0 is treated as 2 5 6). 

Note therefore, that the -number of steps> parameter multiplied by the <time per step> 
parameter shouldn't be greater than the <duration> parameter in the SOUND 
command, otherwise the sound will finish before all the tone steps have been passed 
through. (In such a case, the remaining contents of the tone envelope are discarded.) 

Likewise, if the <duration> parameter in the SOUND command is longer than the 
-number of steps* multiplied by the <time per step>, the sound will continue after all of 
the tone steps have been passed through, and will remain constant at the final tone 
pitch. 

To experiment with the tone envelope, type in the following program: 

10 ent 1,100,2,2 

20 sound 1,284,200, 15,, 1 

run 

Line 2 specifies a S U N D with a tone period of 2 8 4 (international a) lasting for 2 
seconds with a start volume of 1 5 (max), without a volume envelope (represented by 
a blank parameter , , ) and with tone envelope number 1 . 

Line 1 is tone envelope number 1 consisting of 1 steps, increasing the tone pe- 
riod (reducing the pitch) by 2 , every 0.02 second ( 2 x 0,01 second). 
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Now change line 1 in each of the following ways, and then R U N to hear the effect of 
changing the tone envelope: 

10 ent 1,100,-2,2 
10 ent 1,10,4,20 
10 ent 1,10,-4,20 

Now replace the s o u n d command and the tone envelope by typing in: 

10 ent 1,2,17,70 

20 sound 1, 142, 140, 15, ,1 

30 goto 10 

run 

Press [ESC] twice to break. 

Now you can put the volume envelope, tone envelope, and sound command together 
to create various sounds. Start with: 

10 env 1,100,1,3 

20 ent 1,100,5,3 

30 sound 1,284,300,1,1,1 

run 

Then replace line 2 by typing in: 

20 ent 1,100,-2,3 

run 

Now replace all the lines by typing in: 

10 env 1,100,2,2 

20 ent 1,100,-2,2 

30 sound 1,284,200,1,1,1 

run 

If you wish to create a more intricate tone envelope, the 3 parameters: -number of 
steps> , <tone period of step> , -time per step> may be repeated at the end of the ENT 
command up to 4 more times, to specify a different 'section' of the same envelope. 

Try some more variations for yourself. Add some <noise> to the SOUND command, and 
try adding some extra sections to the volume and tone envelopes. 

The chapter entitled 'Complete list of AMSTRAD CPC664 BASIC Keywords' 
contains full details of the various sound commands. If you are interested in the more 
melodius aspects of sound, see the section, 'The Sound of Music' which you will find in 
the chapter entitled At your leisure....'. 
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Part 10: Introducing AMSDOS and 
CP/M.... 

What is AMSDOS?.... 

When the computer is switched on or reset, the system defaults to operation under 
'AMSDOS'. AMSDOS is an abbreviation of AMStrad Disc Operating System, and 
offers the following file handling commands: 

Load "f i Lename" 

run "f i Lename" 

save "f i Lename" 

chain "f i Lename" 

merge "f i Lename" 

chain merge "f i Lename" 

openi n "f i Lename" 

openout "f i Lename" 

c Losei n 

c Loseout 

cat 

input #9 

L i ne i nput #9 

List #9 

print #9 

write #9 

In addition, AMSDOS provides a number of extra commands for disc management. 

These commands are called external commands, and are preceeded with a bar symbol 
I . (You will find the I symbol by holdingdown[SHIFT] and pressing the 3 key.) 

Some of the more common external commands that you will use are: 

la 

lb 

1 1 a p e (which can be sub-divided into I t a p e . i n and 1 1 a p e . u t ) 

I d i s c (which can be sub-divided into I d i s c . i n and I d i s c . o u t ) 

The commands \ a and I b are used on a 2-drive system, to tell the computer which 

drive to direct any subsequent disc command. 
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Typing in for example: 

la 

Load "f i Lename" 

will tell the computer to load the specified program from a disc placed in Drive A. 

If neither I a nor I b is entered or the computer is reset, the system will default to 
Drive A . 

If you are using only the disc drive within the computer, this can be regarded as Drive 
A , and I a or I b commands need not be issued. Entering I b when no additional disc 
drive is connected, will result in the message on the screen: 

Drive B: disc missing 
Retry, Ignore or Cancel 

to which you should respond C (to cancel). 

What if I want to use cassette?.... 

The command I tape tells the computer to perform all loading and saving etc. 
commands to an external cassette unit instead of to disc. Unless 1 1 ape is entered, 
the computer will always default to disc operation when switched on or reset. 

The return to disc operation after I tape has been specified, type in: Idi sc 

Alternatively, you may for example wish to load in from cassette and save out to disc. 
You may then use the command: 

I tape . i n 

....this command tells the computer to read data in from cassette, but continue to 
write data out onto disc (by default). 

Similarly, to read data in from disc and save out onto cassette, you will first need to 
type in: I d i s c . i n to countermand the previously issued I t a pe . i n (above), 
then: I t ape . out totellthecomputertowritedataoutontocassette. 

It can be seen therefore that I t a p e . i n and 1 1 a p e . o u t countermand 
I di s c . i n and I d i s c . out respectively, and vice versa. 

Further information on directing data to and from discs and cassette will be found 
later in this manual in the chapters entitled 'Using discs and cassettes' and 
'AMSDOSandCP/M'. 

In part 7 of the Foundation course, you learned how to format a new blank disc using 
your master CP/M system disc, and how to copy programs from disc to disc. From the 
above description of the commands: 
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Itape Idisc Itape.in Itape.out Idisc.in Idisc.out ia lb 

....you should now be able to perform loading and saving to either disc or cassette (if 
connected), placed in either Drive A or Drive B (if connected). 

Other external commands: 

Idir Idrive lera Iren luser 
... .are dealt with later in this manual, in the chapter entitled 'AMSDOS and CP/M'. 

Copying Using the CP/M System Disc 

( t ~ The entire contents of a disc can be copied from one to another using the CP/M system 
"'" . ../■ disc. If you do NOT have an additional disc drive connected to the computer, use the 
DISC COPY facility. 

If you HAVE connected an additional disc drive, you will find it easier and faster to 
\,> ' usetheCOPYDISCfacility. 

Copying Using DISCCOPY 

Insert the CP/M system disc and type in: 

I cpm 

After the prompt A > appears on the screen, type in: di sccopy 
The computer will ask you to: 

Please insert source disc into drive A then press any key 

Remove the CP/M system disc from the drive, and insert the disc that you wish to 
copy. If you wish to make a back-up copy of the CP/M disc itself, simply leave the 
CP/M disc inserted in the drive. 

When you have inserted your source disc and pressed a key, the computer will 
display the message: 

Copyi ng started 
Read ing track S to 7 
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After which, you will be asked to: 

Please insert destination disc into drive A 
then press any key 

Whereupon you should remove your source disc and insert a disc for copying onto. 

.ti \\ Bear in mind that any previous data on your destination disc will be overwritten 
P / |j during copying. 

If you insert a wrongly formatted or new unformatted disc into the drive, it will be 
correctly formatted automatically during copying. 

After you have inserted your destination disc and pressed a key, the computer will 
display the message: 

Wri ti ng track to 7 

....and will then invite you to insert the source disc once again for reading tracks 8 to 
15. The reading/writing process will continue, 8 tracks at a time, until the last track 
(39) is completed. 

You will then be asked: 

Do you want to copy another disc CY/N): 

If you have finished copying, answer N, then follow the instructions on the screen to 
exit from the DISCCOPY mode. 

Copying Using COPYDISC { - d ^' i >* 

COPYDISC can only be used if you have connected ajidadditionaj^disc drive. The 
facility enables you to copy the entire contents of one disc to another, in a similar 
manner to DISCCOPY previously described. The advantage of COPYDISC 
however, is that you do not have to repeatedly insert and remove the source and 
destination discs. 

Having read and understood the principles of DISCCOPY, COPYDISC may then be 
performed as follows: 

Insert the CP/M system disc and type in: 

I cpm 
After the prompt A > type in: 

copydi sc 
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Follow the instructions on the screen, and the contents of your source disc will be 
copied onto your destination disc 8 tracks at a time, until the last track (39) is 
completed. Like DISCCOPY, COPYDISC incorporates automatic formatting if 
required. C6PYDISC can also be used to produce a back-up copy of the CP/M system 
disc itself. 



Checking Discs 

The CP/M system disc provides facilities for comparing one disc against another, to 
check for error free data copying. 

If you have NOT connected an additional disc drive to the computer, select CP/M 
then type in: 

d i scchk X f* "' 

Follow the instructions on the screen, and the destination disc will be checked 
against the source disc. If the computer detects a difference between the discs, it will 
display the message: 

Failed to verify destination disc correctly: 
(track x sector y) 

Otherwise, the computer will continue to check through the discs, 8 tracks at a time, 
until checking is completed. If an error was detected, a final WARNING: will be 
displayed on the screen, before asking whether you wish to check another disc. 

If you HAVE connected an additional disc-drive, disc checking may be carried out 
with more speed and ease, using the^CHKD I S C facility. This operates in a similar 
manner toDISCCHK previously described. The advantage ofCHKDISC however, is 
that you do not have to repeatedly insert and remove the source and destination 
discs. TouseCHKDISC,selectCP/Mthentypein: >„. „ , -j ../.. ,".,*; 

ch kdi sc 

and follow the instructions on the screen. 



Aborting 



Note that functions performed using the CP/M system disc can be aborted by holding 
down [CTRL] and pressing the C key. Doing so will return you to direct mode CP/M 
(This is called 'Direct Console Mode'). 
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As an example, select CP/M and type in: 

di sccopy 

When the computer invites you to insert a disc, press [CTRL]C. The funtion will then 
be aborted. 

Further information on DISCCOPY, COPYDISC, DISCCHK and CHKDISC 
together with FORMAT and other CP/M commands will be found later in this manual 
in the chapter entitled 'AMSDOS and CP/M'. 

Finally, check that you have observed the following warnings given at the beginning 
of this manual, in the section entitled 'IMPORTANT': 

INSTALLATION NOTES 5,6,7 
OPERATION NOTES 1,2,3,4,5,6,7,8,9 

Well, that concludes this 10-part Foundation course on the CPC664. By now you 
should know what most of the keys on the keyboard do, how to use some of the simpler 
BASIC commands, how to format a brand new disc so that it's ready to use, and how 
to perform some of the most elementary disc functions, i.e. LOADing, SAVEing, 
C A Taloguing etc, together with a few simple AMSDOS and CP/M commands. The 
next part of this manual looks at the more specialised aspects of computing and 
AMSTRAD BASIC. It goes in-depth into the disc drive section of the unit, with 
sections on AMSDOS and CP/M, and starts you off on a new language - Dr. LOGO 
from Digital Research. 
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Chapter 2 

Beyond Foundations.... 



So you've read the Foundation course and you have the computer 
switched on in front of you. You've already learnt how to make it 
carry out an operation several times over using a FOR NEXT 
loop, and how to make it test I F a condition is true THEN do 
something. 

Well, you're soon going to tire of seeing your name printed all over the screen, and 
will want to get on with some serious computing - something useful or entertaining. 
The chapter after this, lists each of the AMSTRAD BASIC keywords at your disposal, 
together with a description of the 'syntax', and what the keyword is used for. Armed 
with this list, the scope of what you can then make the computer do is limited only by 
your imagination. 

If you have never used a computer before, the idea of actually 'programming' may fill 
you with apprehension. Fear not! It's a lot easier than you think, and certainly a lot 
easier than the technology and jargon would have you believe. Think of BASIC not as 
a new language, but as a variation of English with some words abbreviated to speed 
things up. In other words, don't think of C L S as 3 letters of magic code, but instead as, 
C Lear Screen. 

Try not to be afraid of BASIC, and you'll soon find yourself enjoying the business of 
programming, as well as the fruits of your endeavours. Programming can be a very 
rewarding exercise, especially when you're a beginner experimenting with the 
machine and the language. Always remember that as long as you make sure that you 
don't accidentally write onto your master CP/M system disc, nothing you type in can 
actually harm the computer, and it's always worth trying something new. 



So where do I start? 

Starting is often the most difficult part of the program for the beginner. However, 
what you should avoid doing, is plunging straight in and hacking away at the 
keyboard without any forethought. 

One of the first things you should establish, is what exactly you want the program to 
do, and how you want the results to be presented to you (in other words, what the 
screen should look like as the program runs). 

Having decided this, you can then start writing a program to fulfil your 
requirements, all the time thinking of how to make the program flow smoothly from 
beginning to end, with the minimum of jumping around using GOTO here and GOTO 
there. A good program will be easy to follow when listed, and will not land you in a 
hopeless muddle when you try to fault find, or 'de-bug' as they say in computer talk. 
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Fortunately, BASIC is a very forgiving language and will often help you by 
producing error messages on the screen when you go wrong. BASIC also allows you to 
have 'afterthoughts', and new lines of program can be sandwiched in between the 
existing lines with a minimum of fuss. 



Writing a simple program 

OK let's get going. We'll write a program to keep a record of our friends' names and 
telephone numbers. We'll call the program 'Telephone book'. Now let's apply the 
above rules: 'What should the program do?' and 'How should the results be 
presented?' 

Well, the program should let you enter up to say, 100 names and 'phone numbers for 
storage. When you want a number, you should be able to type in the name and get 
back the number. In addition, if you're not sure how one of the names was originally 
entered, you should be able to display a complete list of all the information on the 
screen. Notice by the way, that we're automatically starting to consider the question 
of how the results of the program are to be presented. 

Right, let's put finger to keyboard! We'll start off with the title at the beginning: 
10 REM telephone book 

You don't have to put a title in a program, but when you start to accumulate quite a 
few programs, it helps to be able to know at a glance which is which. 

Next, we know that we want to be able to INPUT (put in) a string of characters 
(somebody's name) into a variable; we'll call that variable NAM E $. The same applies 
to the telephone number, and we'll call that variable T E L$. 

Remember those example programs from the Foundation course? They used the 
INPUT command for you to enter the value of the variable, so if we type in: 

20 INPUT "enter the name"; NAMES 

30 INPUT "enter the telephone number"; TEL$ 

run 

You could enter the name, for example: Joe. You could then enter the 'phone number, 
for example: 0277 230222 

The program has stored the information, but hasn't produced any printed results on 
the screen. A section of program is therefore needed to retrieve the information, then 
display it. To get the values of N A M E $ and T E L $ at the moment, we'd use commands 
like: 

PRINT NAMES. ...and.. ..PRINT TEL$ 
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But hang on! We said that we want to be able to store up to 100 names and 1 00 'phone 
numbers in the program. Surely we don't have to write a program with two hundred 
INPUT commands, each with a different variable name, and then two hundred 
PRINT commands to produce a list on the screen??? Don't worry, computers make 
provision for this with what's known as an 'array'. An array allows you to use one 
variable (such as NAMES) which can have any number of 'dimensions' (in our 
program, we require 100). Then, when you want to get at the contents of the variable, 
you use the variable's name followed by its reference number (inside brackets). This 
reference number is called a 'subscript' and the expression N A M E $ ( 2 7 ) for 
example, is called a 'subscripted variable'. Now if we use a number-variable as the 
subscript, for example N AMES C x ) , we can then process the whole list of variables 
from 1 to lOOby changing the value of x in a FOR NEXT loop, i.e. FOR x = 1 TO100. 
As the value of x increases by 1, so the subscript value changes and refers to a 
different 'element' or name in the N A M E $ array. 

We want two arrays; one for N A H E $ , and one for T E L$ , each with a dimension of 100 
elements. Before we can start using an array, we must declare its D I tensions at the 
outset. We'll overwrite lines 1 and 2 with these statements: 

20 DIM NAME$(100) 
30 DIM TEL$(100) 

Having established our variables, let's write some program that will firstly enable us 
to enter the names and numbers into the arrays, for later retrieval. Add: 

40 FOR x=1 TO 100 

50 INPUT;" name";NAHE$(x) 

60 INPUT " phone";TEL$(x) 

70 NEXT 

run 

This is all very well, but we may not want to enter all 100 names at once. What's 
more, the way that the program presents itself on the screen is most unsatisfactory. 
What's needed here is a bit of tidying up. Firstly, before taking input of each new 
name and number, let's rid the screen of all the previous superfluous text, by 
C Learingthe Screen each time. Add: 

45 CLS 



Now, how do we get the computer to know that we've finished inputting information 
for the moment? Pressing [ESC] would stop the program alright, but as soon as you 
typed RUN again, you'd lose all the values of your carefully entered variables! 
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Here's what we can do instead. As the program takes input of a new name, we'll make 
the program check that at least something has been typed in for the value of 
N A M E $ ( x ) , in other words, check whether the value of N A M E $ ( x ) is an 'empty 
string' or not. I F it is, T H E N we'll make the program stop taking any more input. Did 
you get the clue on how we can do this? Add: 

55 IF NAME$(x)= M " THEN 80 
80 PRINT "no more input" 

Also, so that the program tells you how to stop inputting, add: 

47 PRINT "[ENTER] nothing to end input" 

Now let's write some program to P R I N T the information you've stored, firstly in the 
form of a list. Add: 

90 FOR x=1 TO 100 

100 PRINT NAHESCx);" ";TEL$(x) 

110 NEXT 

Once again the program doesn't know when to stop, before reaching the 100th 
element of the array, so let's add: 

95 IF NAME$(x)="" THEN 120 
120 PRINT "List finished" 

Line 9 5 detects whether N A M E $ ( x ) is an empty string, and I F so, T H E N stops 
printing by bypassing lines 100 and 110. 

And so to the next of our requirements. We'll now write some program that searches 
for a particular name that you enter. Add: 

130 INPUT "f ind";SEARCH$ 

140 FOR x=1 TO 100 
^,y 150 IF INSTR(NAME$Cx),SEARCH$)=0 THEN 180 
-V 160 PRINT NAME$(x);" ";TEL$(x) 

170 END 

180 NEXT 

190 PRINT "name not found" 

run 
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There's a new command in line 1 5 - I N S T R. It tells the computer to I Nterrogate 
the first S T Ring expression to find the first occurence of the second string expression, 
in other words, it searches NAME$(x) for SEAR CHS (which is the variable you 
input in line 130 containing the name that you're looking for). If I N S T R doesn't find 
it (or any part of it), it gives out a value of 0, which is used here to make the program 
pass to line 1 8 and try again with the N E X T value of x . If the program has passed 
through all values of x up to 100, it then continues to line 1 9 and tells you that it 
hasn't found the name. If however it does Find the name, I N S T R will not produce a 
value ofO, and the program will then pass from line 1 50 to 160 and print the name 
and phone number, then E N D at line 170. 

As you can see, our program is developing quite rapidly now, but there's still so much 
to be done. Let's sit back for a moment and consider some drawbacks of this program, 
starting with the way in which the program runs: First you type in the information, 
then you get a list back, then you search for a specific name. 



What if? 

Well, what if you don't want to do it in that order? What if you want to start by 
searching for a name that you stored in the program yesterday? And what if you want 
to add some more names and numbers to those already there? These are all aspects of 
the program that you have to think about and find solutions for; it's what 
programming is all about. As previously mentioned, BASIC is kind enough to let you 
sandwich afterthoughts into the program, but a good programmer will have 
anticipated these problems beforehand. 

Another major problem with this program is that the values of the variables in the 
arrays are all stored in a part of the computer's memory that is cleared whenever you 
R U N a program. You'll not want to have to type in all the information every time you 
use the program, so you'll need the option of being able to save the values of all the 
N A M E $ and T E L $ variables before you switch off, together with the option to load in 
the values of the variables whenever you run the program. 



Solutions 

The first of these problems (i.e. the order in which things are carried out) can be dealt 
with by writing the program so that when it runs, you get a choice of the various 
functions that it can perform. This type of program is called 'menu-driven', and in 
effect displays a menu on the screen from which you can select an option. If you've 
ever used one of those cash dispensers outside the bank, then you'll have already 
operated a menu-driven computer program! Let's add a menu to this program: 
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32 PRINT "1. enter info" 

33 PRINT "2. list info" 

34 PRINT "3. search" 

35 PRINT "4. save info" 

36 PRINT "5. Load info" 

37 INPUT "CENTER] menu se I ec t i on"; ms 

38 ON ms GOSUB 40,90,130 

85 RETURN 
125 RETURN 
170 RETURN 
200 RETURN 

As you can see, we've made the program print the menu of options, then take INPUT 
of your selection, putting it into the variable m s , The command ONmsGOSUB inline 
3 8 tells the program that if m s = 1 then G to the first S U B-routine line number 
(A 0); if m s =2 then G to the second S U B-routine line number (90), and so on. 

As each of the functions are now sub-routines called by the N m s G S U B command, 
they must each have a R E T U R N command at the end, hence we have added all those 
RETURN commands above. 

Do you remember what the R E T U R N command does? It makes BASIC return from 
the sub-routine to the point in the program immediately following the appropriate 
GOSUB command, so in this case it returns to the instruction after line 38 (which 
means that the program will continue at line 4 - the 'enter info' point!) We don't 
want that to happen, so we must add: 

39 GOTO 32 

....to make the program loop back and display the menu once again. Now RUN the 
program again to see how far we've progressed. 

OK let's have a look at the listing of the program for a moment. (If the program is still 
running, press [ESC] twice.) Type in: 

LIST 

This is what you should have so far: 

10 REM telephone book 
20 DIM NAME$(100) 
30 DIM TELSC100) 

32 PRINT "1. enter info" 

33 PRINT "2. List info" 

34 PRINT "3. search" 

35 PRINT "4. save info" 
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36 PRINT "5. Load info" 

37 INPUT "[ENTER] menu se tect i on";ms 

38 ON ms GOSUB 40,90,130 

39 GOTO 32 

40 FOR x=1 TO 100 
45 CLS 

47 PRINT "CENTER] nothing to end input" 

50 INPUT;" name";NAME$(x) 

55 IF NAME$(x)="" THEN 80 

60 INPUT " phone";TEL$(x> 

70 NEXT 

80 PRINT "no more input" 

85 RETURN 

90 FOR x=1 TO 100 

95 IF NAME$Cx)="" THEN 120 

100 PRINT NAME$(x);" ";TEL$(x) 

110 NEXT 

120 PRINT "List finished" 

125 RETURN 

130 INPUT "f ind";SEARCH$ 

140 FOR x=1 TO 100 

150 IF INSTR(NAME$(x),SEARCH$)=0 THEN 180 

160 PRINT NAHESCx);" ";TEL$Cx) 

170 RETURN 

180 N.EXT 

190 PRINT "name not found" 

200 RETURN 

You'll see that in certain parts of the program, we're starting to run out of lines to 
insert instructions, so let's create some more space and tidy things up by 
R E N U Mbering the lines. Type in: 

RENUM 

LIST 

You should now see: 

10 REM telephone book 

20 DIM NAME$(100) 

30 DIM TELSC100) 

40 PRINT "1. enter info" 

50 PRINT "2. list info" 

60 PRINT "3. search" 

70 PRINT "4. save info" 

80 PRINT "5. Load info" 

90 INPUT "CENTER] menu se Lect i on";ms 
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100 ON ms GOSUB 120,210,270 

110 GOTO 40 

120 FOR x=1 TO 100 

130 CLS 

140 PRINT "[ENTER] nothing to end input" 

150 INPUT;" name";NAME$(x) 

160 IF NAME$(x)="" THEN 190 

170 INPUT " phone";TEL$(x) 

180 NEXT 

190 PRINT "no more input" 

200 RETURN 

210 FOR x=1 TO 100 

220 IF NAME$(x)="" THEN 250 

230 PRINT NAMESCx);" ";TEL$(x) 

240 NEXT 

250 PRINT "List finished" 

260 RETURN 

270 INPUT "f ind";SEARCH$ 

280 FOR x=1 TO 100 

290 IF INSTR(NAME$(x),SEARCH$)=0 THEN 320 

300 PRINT NAMESCx);" ";TEL$Cx) 

310 RETURN 

320 NEXT 

330 PRINT "name not found" 

340 RETURN 

That's better. Now on with the program! We'll now add an instruction, so that 
whenever you enter some new names and 'phone numbers, the computer will add 
them to the existing entries, by placing them in the first element of the array that it 
finds to be empty. This time, we'll use the new command L E N to tell us the L E Ngth of 
the string. We'll specify the following: 

I F the L E Ngth of N A M E $ ( x ) is greater than 0, i.e. if there's already an entry in 
that element of the array, THEN jump to line 1 8 (which steps to the NEXT element 
in the array). 

Notice again how similar the above instruction in English is, compared to the 
equivalent BASIC instruction just below. I told you that BASIC isn't really a 
different language! ! ! 

135 IF LENCNAME$Cx))>0 THEN 180 

Such a simple solution isn't it? Problems like these can always be sorted out with your 
list of BASIC keywords and a little thought. There's nearly always at least one 
command that will satisfy your programming needs, and the more you program, the 
more you'll be able to find instant solutions 'off the top of your head'. 
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Now to the matter of saving the contents of the variables so that they can be loaded 
back in when the program is run. Part 7 of the Foundation course explained how to 
save the program itself, using the SAVE command. However the program itself is 
only a framework which lets the variable values be put in (at the keyboard) and taken 
out (at the screen). When you SAVE the program, you are saving only that 
framework, not the values of the variables. 

Hence we must write a section of program that will save the values of the variables 
onto disc. We do this by creating a separate 'data file'. 

First we OPEN an OUTput file and specify a name for it such as "da t a". Then we 
WRITE the values of the variables NAME$(x) andTEL$(x) from 1 to 100, into 
the file, and finally we CLOSE the OUTput fileand RETURN to the menu. Let'saddit 
to the program from line 3 5 onwards. To save us typing in each new line number, 
we'll use the command: 

AUTO 350 

....which will start AU T Omatic line numbering from the required line: 

350 OPENOUT "data" 

360 FOR x=1 TO 100 

370 WRITE #9,NAME$(x),TEL$(x) 

380 NEXT 

390 CL0SE0UT 

400 PRINT "data saved" 

410 RETURN 

After you have typed in line 410 and [ENTER]ed it, press [ESC] to stop the 
A U T Omatic line numbering. 

Now we need to add an extra number to the list of numbers in the ON ms GOSUB 
command in line 100. This is because we have added another option for the menu to 
select. Therefore EDIT line 1 to add this extra number: 

100 ON ms GOSUB 120,210,270,350 

Now, whenever you select menu option number 4, the program will save all the 
information that you entered, onto disc. 

Notice that in line 370, where the program WR I TEs the values of NAMES ( x) and 
TEL$( x) onto disc, the expression #9 is usedaftertheword WRITE.The U sign is a 
'stream director', in other words, it tells the computer which 'stream' to send the data 
to. The computer has 10 streams: 

Directing data to streams to 7 (#0 to #7) will result in it appearing on the screen 
because streams #0to #7 are 'screen streams' or WINDOWS. 
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Directing data to stream # 8 sends data to the printer (if connected). 

Finally, directing data to stream # 9 sends it to the disc drive, which is what we have 
done inline 370. 



If I may digress.... 

A few words now about the AUTO command which we used a moment ago. If you 
leave out the line number and just type in: 

AUTO 

...,the computer will commence line numbering from 10, advancing by 10 each time 
the line is [ENTER]ed, If you have previously used lines 1 0, 20, 30 etc, each line's 
contents will be displayed on the screen as you pass through it (by pressing [ENTER] 
each time). When each line appears on the screen, it may be edited before pressing 

[ENTER], thus providing a quick method of continuously editing regularly successive 
program lines. 



Back to the program.... 

We've now added the instructions to save the information to disc, so the final main 
section of this program will load the data back from disc, ready for use. Therefore, we 
must add yet another menu option to the list of numbers in line 100. Edit line 100 
again, as follows: 

100 ON ms 60SUB 120,210,270,350,420 

Now for the instructions to load the information. We start by P E Ning the I Nput file 
from disc called "data". Then we take INPUT from disc (stream #9) of all the 
values of the variables N AMES ( x ) and T E L$ < x ) from 1 to 100, and lastly we 
C L0 S E the I Nputfileand RETURN to the menu. Type in: 

420 0PENIN "data" 

430 FOR x=1 TO 100 

440 INPUT #9,NAME$<x),TEL$(x) 

450 NEXT 

460 CL0SEIN 

470 PRINT "data Loaded" 

480 RETURN 
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The end of the beginning.... 

So now we have written a program which fulfils the requirements that we set out to 
achieve when we decided 'what the program has to do'. All that remains now, is to 
improve the way that 'the results are presented' on the screen. 



The beginning of the end.... 

Let's add some instructions to tidy up the presentation of the program: ■ 

34 RODE 1 

This establishes the screen mode, and clears the screen at the start of the program. 
Now add: 

36 WINDOW #1,13,30,10,14 

Don't be put off by this seemingly complicated instruction. What we're doing here is 
creating a small window on the screen to put the menu into. After the word WINDOW, 
we first specify which stream number this window is for, remember we can use 8 
screen streams from #0 to #7. Now bearing in mind that all items printed on the 
screen use stream #0 unless otherwise instructed, we won't use stream #0 for our 
little window, otherwise everything that the program prints will be sent to it. Instead 
we'll specify another stream between U 1 and #7, and as you can see, we've chosen 
# 1 . The four numbers that follow # 1 , tell the computer what size the WINDOW 
should be, and it couldn't be easier; the numbers specify the left, right, top, and 
bottom edges of the window, and refer to text column and row numbers (the same as 
those used in the LOCATE command). So in our example, after specifying that it's 
stream # 1 we're using, we say that the left edge of the window starts at column 1 3, 
the right edge ends at column 3 , the top edge starts at row 1 , and the bottom edge 
ends at row 1 4. 

Now to make all our menu options print in stream (WINDOW) # 1 , we'll have to edit 
lines 4 to 8 as follows: 

40 PRINT #1,"1. enter info" 

50 PRINT #1,"2. List info" 

60 PRINT #1,"3. search" 

70 PRINT #1,"4. save info" 

80 PRINT #1,"5. Load info" 

Let's now add: 

85 LOCATE 7,25 
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This LOCATEs where the menu INPUT statement in line 9 will appear, so that it 
looks neater. 

So that the screen is always cleared when the menu is returned to, edit line 1 1 to: 

110 GOTO 34 
So that the screen is always cleared when one of the menu options is selected, add: 

95 CLS 

Finally, we'll just add the following three lines to make the program pause before 
returning to the menu: 

103 LOCATE 9,25 

105 PRINT "press any key for menu" 

107 IF INKEY$="" THEN 107 

Line 1 3 tells the computer where to print the message given in line 105. Line 107 
INterrogates the KEYboard to see what String variable is being input (by a key 
being pressed). I F it detects that an empty string is being input (because no key is 
pressed), THEN the program loops back to the same instruction again and again, 
until I N K E Y $ finds that the string is not empty because a key has been pressed. This 
is a useful way of creating a pause in a program, as BASIC will not pass to next line 
until a key is pressed. 

So there it is; the finished program. Or is it? Well, you could make it have the facility 
to amend and delete names and 'phone numbers, to sort the list into alphabetical 
order, to 'print-out' the list on a printer, or if you're really ambitious, to make the 
program produce the signals to automatically dial the number after you've typed in 
the name - with of course, the permission of British Telecom to connect your 'phone to 
the computer! Nevertheless all these enhancements to the program are possible, and 
in truth you can go on forever improving and streamlining a program, especially 
when you've got a computer system as powerful as the CPC664. No, we've got to draw 
the line somewhere, and this is where we'll leave our 'telephone book', hopefully 
having learned a thing or two about the art of writing a program from scratch. Tidy 
up the program by typing in: 

RENUM 

....and then save it to disc, or throw it away. You never know though, it might come in 
handy for keeping a record of your friends' names and telephone numbers! 
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Final listing: 



10 REM telephone book 

20 DIM NAMESC100) 

30 DIM TEL$(100) 

40 MODE 1 

50 WINDOW #1 ,13,30,10,14 

60 PRINT #1,"1. enter info" 

70 PRINT #1,"2. List info" 

80 PRINT #1,"3. search" 

90 PRINT #1,"4. save info" 

100 PRINT #1,"5. Load info" 

110 LOCATE 7,25 

120 INPUT "[ENTER] menu se Lee t i on"; ms 

130 CLS 

140 ON ms GOSUB 190,290,350,430,500 

150 LOCATE 9,25 

160 PRINT "press any key for menu" 

170 IF 1NKEY$="" THEN 170 

180 GOTO 40 

190 FOR x = 1 TO 100 

200 CLS 

210 IF LEN(NAME$(x))>0 THEN 260 

220 PRINT "[ENTER] nothing to end input" 

230 INPUT;" name";NAME$ ( x ) 

240 IF NAME$(x)="" THEN 270 

250 INPUT " phone";TEL$(x) 

260 NEXT 

270 PRINT "no more input" 

280 RETURN 

290 FOR x=1 TO 100 

300 IF NAME$(x>="" THEN 330 

310 PRINT NAME$(x);" ";TEL$(x) 

320 NEXT 

330 PRINT "List finished" 

340 RETURN 

350 INPUT "f ind";SEARCH$ 

360 FOR x=1 TO 100 

370 IF INSTR(NAME$Cx),SEARCH$)=0 THEN 400 

380 PRINT NAMESCx);" ";TEL$(x) 

390 RETURN 

400 NEXT 

410 PRINT "name not found" 

420 RETURN 

430 OPENOUT "data" 
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440 FOR x=1 TO 100 

450 WRITE #9,NAME$(x),TEL$(x) 

460 NEXT 

470 CLOSEOUT 

480 PRINT "data saved" 

490 RETURN 

500 OPENIN "data" 

510 FOR x=1 TO 100 

520 INPUT #9,NAME$(x),TEL$(x) 

530 NEXT 

540 CLOSEIN 

550 PRINT "data Loaded" 

560 RETURN 

run 
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Chapter 3 Complete list of 
Amstrad CPC664 BASIC keywords 



IMPORTANT 

It is vital that you understand the terminology and notation that 
we use in this chapter You will see various types of brackets used 
when explaining how a particular command is typed in; each of 
these types of brackets has a specific meaning, and you should 
note them well. 



Any part of a command not shown enclosed by brackets is required as given. For 
example, the command END takes the form: 

END 

....and you must type in the word END literally. 

Where an item is enclosed in angled brackets < > for example: 

<linenumber> 

....you are NOT required to type the brackets, nor the words within them. The 
example above shows you the type of data required in the command. For example: 

EDIT <linenumber> 
... .means that you should type in: 

EDIT 100 
Round brackets ( ) MUST be typed in literally. For example: 

C0S( <numeric expression* ) 

....requires that brackets be typed around the < numeric expression) of which the 
COS ine is required, e.g: 

PRINT COSC45) 
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Finally, square brackets enclose optional items in a command or function. For 
example: 

RUN ['line number>] 

....means that you do not have to follow the keyword RUN with a parameter, but that 
you can expand the command by adding the optional parameter <line number >. 
Hence, the command could be typed in as: 

RUN ....or.... RUN 100 



Special Characters 

8 or 8 H Prefix for hexadecimal constant 
8 X Prefix for binary constant 

# Prefix for stream director 



Datatypes 

Strings may be from to 255 characters long. A <string expression* is an expression 
which yields a value of type string. Strings may be appended to one another using the 
+ operator, as long as the resulting string is no greater than 255 characters long. 

Numeric data can be either integer or real. Integer data is held in the range -32768 
to 32767 and real data is held to a little over nine digits of precision in the range 
± 1.7E +38 with the smallest value above zero approximately 2.9E-39. 

A -numeric expression* is any expression that results in a numeric value. It may 
simply be numbers, or it may be a numeric variable, or it may be numbers operated on 
by variables; just about anything that is not a <string expression'. 

A <stream expression- refers to a ^numeric expression* which identifies a screen 
window, printer, or disc, where the text is required to 'stream'. 

A <list of:<item> describes a parameter which comprises a list of items separated by 
commas. The list may contain one, or any number of items, limited by line length. 

Type markers are: 

X Integer 

! Real (The default) 

$ String 
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Please note that AMSTRAD CPC664 BASIC keywords are listed here using the form: 

KEYWORD 

Syntax 

Example 

Description 

Associated keywords 



Keywords are either: 

COMMANDS : operations that are executed directly. 
FUNCTIONS : operations that are brought into action as arguments 

in an expression. 
OPERATORS : acting upon mathematical arguments. 

BASIC converts all keywords entered in lower case letters to UPPER CASE when a 
program is LI S Ted. The examples shown in this chapter use UPPER CASE, since 
this is how the program will appear when L I S T ed. Hence you should enter using 
lower case, as you will be able to spot typing errors more readily since the mis-typed 
keyword will still be displayed in lower case when LI STed. 

For a comprehensive guide to AMSTRAD CPC664 BASIC, see the Concise BASIC 
specification SOFT 945 . 



Keywords.... 

ABS 

A B S C mumeric expression? ) 

PRINT ABS(-67.98) 
67.98 

FUNCTION: Returns the AB Solute value of the given expression. This means that 
negative numbers are returned as positive. 

Associated keywords: S G N 
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,> ,r, ; - 


y.p 


!'>1.l~r ' 


j" 


.? , : ..-' 


/ C p 
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AFTER 

AFTER <timer delay>[ , <timer number>J G OS U B <line number* 

10 AFTER 250 GOSUB 60:CLS 

20 PRINT "Guess a Letter in 5 seconds" ■:,.. f 

30 a$ = INKEY$:IF f Lag=1 THEN END : ' !: '"' , ,. 

40 IF a$<>CHR$(INT(RND*26+97)) THEN 30 

50 PRINT a$;" is correct. You win" - 






-f i 



55 SOUND 1,478:S0UND 1,358:END Ac'U'- 

60 PRINT "too Late. I win" r ,■ 

70 SOUND 1,2000:f Lag=1:RETURN f ' '" ' 

run 



/■(■■•/■*» 



COMMAND: Calls a BASIC sub-routine after a given period of time has elapsed. The 
< timer delay > parameter specifies the period of time in units of .02 (fiftieths) second. 

The -timer number* (in the range to 3) specifies which of the four delay timers are to 
be used. Timer 3 has the highest priority; timer (the default timer) has the lowest. 

Each of the timers may have a sub-routine associated with it 

Further information concerning interrupts will be found in part 2 of the chapter 
entitled 'At your leisure....'. 

Associated keywords: EVERY, REMAIN, RETURN 

AND 

-argument* AND <argument> 

IF "aLan"<"bob" AND "dog">"cat" THEN PRINT "correct" ELSE PRINT "wrong" 
correct 

IF "bob"<"alan" AND "cat">"dog" THEN PRINT "correct" ELSE PRINT "wrong" 
wrong 

IF "alan"<"bob" AND *'cat*'>"dog" THEN PRINT "correct" ELSE PRINT "wrong" 
wrong 



PRINT 1 AND1 

1 
PRINT0AND0 


PRINT1 AND0 



OPERATOR: Performs bit-wise boolean operation on integers. Result is unless 
both argument bits are 1 . 

Further information concerning logic will be found in part 2 of the chapter entitled 
'Atyour leisure....'. 



Associated keywords: 0R,N0T,X0R 
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ASC 

A S C < <string expression) 

PRINT ASCC'x") 

120 

FUNCTION: Returns the numeric value of the first character in the <string 
expression*. 

Associated keywords: CHR$ 
ATN 

A T N ( <numeric expression) ) 

PRINT ATNtl) 
0.785398163 

FUNCTION: Calculates the Arc-TaNgent of the <numeric expression^ 

Note that D E G and RAD can be used to force the result of the above calculation to 
degrees or radians respectively. 

Associated keywords: COS, D EG, RAD, S I N, TAN 

AUTO 

AUTO [dine number>][, 'increments 

AUTO 100,50 

COMMAND: Generates line numbers AUTOmatically. The optional dine number> 
parameter sets the first line to be generated in case you wish to generate lines from a 
particular point in the program. If the parameter is omitted, line numbers will be 
generated from line 1 onwards. 

The optional <increment> sets the number of lines to leave before generating the 
following line number. If the parameter is omitted, the line numbers will increase by 
10 each time. 

If a line number is generated which is already in use, then the contents of the line will 
be displayed on the screen and may be edited if required. The displayed line will be 
replaced in the memory when [ENTER] is pressed. 

To stop automatic line numbering, press [ESC]. 
Associated keywords: none 
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BIN$ 

B I N $ C <unsigned integer expression^ , integer expression*] ) 

PRINT BIN$<64,8) 
01000000 

FUNCTION: Produces a string of B I Nary digits representing the value of the 
-unsigned integer expression*, using the number of binary digits instructed by the 
second <integer expression* (in the range to 16). If the number of digits instructed is 
too great, the resulting expression will be filled with leading zeros; if the number of 
digits instructed is too small, the resulting expression will NOT be shortened to the 
instructed number of digits, but will be produced in as many digits as are required. 

The <unsigned integer expression* to be converted into binary form must yield a value 
in the range -32768 to 65535. 

Associated keywords: DEC$,HEX$,STR$ 

BORDER 

BORDER <colour>[, <colour>] 

10 REM 729 border combinations! 

20 SPEED INK 5,5 

30 FOR a=0 TO 26 

40 FOR b=0 TO 26 

50 BORDER a,b:CLS:LOCATE 14,13 

60 PRINT "border";a; ",";b 

70 FOR t=1 TO 500 

80 NEXT t,b,a 

run 

COMMAND: Changes the colour of the border on the screen. If two colours are 
specified, the border alternates between the two at a rate determined in the S P E E D 
INK command. The range of border colours is to 26. 

Associated keywords: SPEED INK 

BREAK 

(See ON BREAK CONT, ON BREAK GOSUB, ON BREAK STOP) 
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CALL 

CALL<addressexpression>[ i ,<list of:<parameter>] 
CALL 

COMMAND: Allows an externally developed sub-routine to be called from BASIC. 
The above call completely resets the computer. 

Not a command to be used by the unwary. 

Associated keywords: UNT 

CAT 

CAT 

CAT 

COMMAND: C A Talogs the disc. Displays in alpha-numeric order, the full names of 
all files found, together with each file's length (to the nearest higher Kbyte). The free 
space left on the disc is also displayed, together with Drive and User identification. 

Cataloguing does not affect the program currently in memory. 

Associated keywords: LOAD,RUN,SAVE 

CHAIN 

CHAIN <filename>[ / dine number expression* ] 

CHAIN "testprog.bas",350 

COMMAND: Loads a program from disc into the memory, replacing the existing 
program. The new program then commences running, either from the beginning, or 
from a line specified in the optional dine number expression*. 

Protected files, ( S A V E d by , p ) can be loaded and run by C H A I N ing. 

Associated keywords: CHAIN MERGE, LOAD, MERGE 
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CHAIN MERGE 

CHAIN MERGE <filename>[ , <line number expression*] 

[,DE LETE <line number range>] 

CHAIN MERGE "newrun . bas", 750, DELETE 400-680 

COMMAND: Loads a program from disc, merges it into the current program in the 
memory, then commences running the resultant program, either from the beginning, 
or from a line specified in the optional <line number expression. . If before a program is 
CHAIN M E R G Ed, it is required to delete part of the original program, the D E L E T E 
<line number range> option may be used. 

Note that line numbers in the old program which exist in the new program to be 
CHAIN MERGEd,willbe over- written by the new program lines. 

Protected files, ( S A V E d by , p ) can NOT be loaded and run by C H A I N H E R G E ing. 
Associated keywords: CHAIN, DELETE, LOAD.MERGE 

CHR$ 

C H R$ ( 'integer expression* ) 

10 FOR x=32 TO 255 
20 PRINT x;CHR$(x), 
30 NEXT 

run 

FUNCTION: Converts an 'integer expression* in the range to 255, to its C HaRacter 
String equivalent, using the AMSTRAD CPC664 character set shown in part 3 of the 
chapter entitled 'For your reference. . . . '. 

Note that to 31 are control characters; hence the above example prints C H R$ ( x ) 
in the range 32 to 255. 

Associated keywords: A S C 

CINT 

C INT < <numeric expression*) 

10 n=1.9999 

20 PRINT CINT(n) 

run 
2 

FUNCTION: Returns the value of the 'numeric expression*, Converting 
it to a rounded I N Teger in the range -32768 to 32767. 

Associated keywords: CREAL, F IX, INT, ROUND, UNT 
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CLEAR 

CLEAR 

CLEAR 

COMMAND: Clears all variables to zero or null. All open files are abandoned, all 
arrays and user functions are erased, and BASIC is set to radians mode of calculation. 

Associated keywords: none 
CLEAR INPUT 

CLEAR INPUT 

10 CLS 

20 PRINT "Type in Letters now!" 

30 FOR t=1 TO 3000 

40 NEXT 

50 CLEAR INPUT 

run 

COMMAND: Discards all previously typed input from the keyboard, still in the 
keyboard buffer. 

To see the effect of this command, RUN the above program and type in letters when 
asked to do so. Then delete line 5 of the program and RUN again, noting the 
difference. 

Associated keywords: I NKEY, I NKEYS, J OY 

CLG 

CLG[<ink>] 

LOCATE 1,20 
CLG 3 

COMMAND: C Lears the Graphics screen to the graphics paper colour. If the <ink> is 
specified, the graphics paper is set to that value. 

Associatedkeywords: CLS, GRAPHICS PAPER, INK, ORIG I N 
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CLOSEIN 

CLOSEIN 

CLOSEIN 
COMMAND: C LOS Esany I Nput file from disc. (See OPEN IN). 
Associated keywords: E0F,0PENIN 

CLOSEOUT 

CLOSEOUT 

CLOSEOUT 
COMMAND: C LOS Esany OUTput file to disc. (See OPENOUT). 
Associated keywords: OPENOUT 

CLS 

C LSr#<streamexpression>] 

10 PAPER#2,3 
20 CLS#2 
run 

COMMAND: C Lears the given S creen stream (window) to its paper ink. If no <stream 
expression* is given, screen stream # is cleared. 

Associatedkeywords:CLG, INK, PA PER, WINDOW 
CONT 

CONT 

CONT 

COMMAND: CONTinues program execution, either after the [ESC] key has been 
pressed twice, or after a S T P command has been encountered in the program. 
CONT will only continue to execute the program if it has not been altered, and if it is 
not a protected program. 

Direct commands may be entered before CON Tinuing. 

Associated keywords: STOP 
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COPYCHR$ 

C0PYCHR$(# stream expression- ) 

10 CLS 

20 PRINT "top corner" 

30 LOCATE 1,1 

40 a$=COPYCHR$(#0> 

50 LOCATE 1,20 

60 PRINT a$ 

run 

FUNCTION: CO Pies a CHaRacter from the current position in the stream (which 
MUST be specified). The above program copies a character from location 1,1 (top left), 
and reproduces it at location 1,20. 

If the character read is not recognised, a null string is returned. 

Associated keywords: LOCATE 

COS 

COS (-numeric expression-) 

DEG 

PRINT C0SC45) 
0.707106781 

FUNCTION: Calculates the CO Sine of the <numeric expression*. 

Note that D E G and RAD can be used to force the result of the above calculation to 
degrees or radians respectively. 

Associated keywords: ATN,DEG,RAD,SIN 
CREAL 

C R E A L ( <numeric expression- ) 

10 a=PI 

20 PRINT CINTCa) 

30 PRINT CREAL(a) 

run 

3 

3.14159265 

FUNCTION: Returns the value of the -numeric expression*, Converting it to R E A L. 
Associated keywords: C I N T 
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CURSOR 

CURSOR f -system switch*ll", <user switch-] 

10 CURSOR 1 

20 PRINT "question?"; 

30 a$=INKEY$:IF a$="" THEN 30 

40 PRINT a$ 

50 CURSOR 

run 

COMMAND: Sets the system switch or the user switch to the cursor, on or off. The 
-system switch> and <user switch* parameters must be either (off) or 1 (on). In the 
above I N K E Y $ command, where the cursor is not normally visible, the cursor has 
been turned on by the <systemswitch> setting of 1 (inline 10). 

The cursor is displayed whenever both the -system switch* and the <user switch* are 
on ( 1 ). The < system switch* is automatically turned on for the command INPUT, but 
is turned off for IN KEYS. 

It is recommended that the cursor be turned off when printing text to the screen. 

Either switch parameter may be omitted, but not both. If a switch parameter is 

omitted, that particular switch state is not changed. 

Associated keywords: LOCATE 
DATA 

DATA <listof:<constant> 

10 FOR x=1 TO 4 

20 READ name$, surnames 

30 PRINT "Mr. ";name$;" ";surname$ 

40 NEXT 

50 DATA Ken, Bar Low,ALf, Roberts 

60 DATA Mi ke,Bal.dwi n, Jack, Duckworth 

run 

COMMAND: Declares constant data for use within a program. Data may be read into 
the variable by the READ command, after which the 'pointer' moves on to the next 
item in the D A T A list. The RESTORE command may be used to move the pointer to a 
specified DATA position. 

Further information concerning data will be found in part 2 of the chapter entitled 

'Atyour leisure....'. 

Associated keywords: READ, RESTORE 
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DEC$ ^ ,: " v (?;■>■■<■■ 

■ .,■ ... *■'■ '■ * ' 

DEC$(<numericexpression>,<formattemplate>) ' ,. , , ,<■■; 

PRINT DEC$(10T7,"££#########,.#tf") 
£10,000,000.00 

FUNCTION: Returns a D E Cimal string representation of the <numeric expression*, 
using the specified ^format template* to control the print format of the resulting 
string. 

The format template may contain ONLY the characters: 

+-£$*#, . t 

The use of these 'format field specifiers' is described under the keyword PRINT 
USING. 

Associatedkeywords:BIN$,HEX$,PRINT USING,STR$ 

DBF FN 

D E F FN<functionname>[ ( <formal parameters' ) J = <expression> 

10 t=TIME/300 

20 t>EF FNcLock=INT(TIME/300-t> 

30 EVERY 100 GOSUB 50 

40 GOTO 40 

50 PRINT "program was run"; 

60 PRINT FNcLock;"seconds ago" 

70 RETURN 

run 

COMMAND: DE Fines a FuNetion. BASIC allows the program to define and use 
simple value returning functions. D E F F N is the definition part of this mechanism 
and creates a program-specific function which works within the program in the same 
way that for example COS operates as a built-in function of BASIC. 

(Note in the above example how the value of the function FNcLockis continually 
updated even if the program is paused by pressing [ESC] once, or stopped by pressing 
[ESC] twice, then CONTinuing.) 

Associated keywords: none 
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DEFINT 

DEFINT 'list of:<letter range* 

10 DEFINT n 
20 number=123.456 
30 PRINT number 
run 
123 

COMMAND: Sets the D E Fault for a variable to type I N Teger. When a variable is 
encountered without an explicit type marker ( ! % $), the default type is assumed. 
This command sets the default for variables with the specified first letter(s) to type 
I N Teger. There may be a list of first letters such as: 

DEFINT a,b,c 
... .or there may be an inclusive range of first letters such as: 

DEFINT a-z 
Associated keywords: DEFREAL, DEFSTR 

DEFREAL 

DEFREAL <list of:<letter range> 

DEFREAL x,a-f 

COMMAND: Sets the DE Fault for a variable to type REAL. When a variable is 
encountered without an explicit type marker ( ! % $), the default type is assumed. 
This command sets the default for variables with the specified first letter(s) to type 
REAL. There may be a list of first letters such as: 

DEFREAL a,b,c 
. ...or there may be an inclusive range of first letters such as: 

DEFREAL a-z 
Associated keywords: DEFINT.DEFSTR 
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DEFSTR 

D E F S T R <list of:<letter range> 



10 DEFSTR n 

20 name="Amst rad" 

30 PRINT name 

run 

Amstrad 



COMMAND: Sets the D E Fault for a variable to type S T Ring. When a variable is 
encountered without an explicit type marker ( ! % $), the default type is assumed. 
This command sets the default for variables with the specified first letter(s) to type 
S T Ring. There may be a list of first letters such as: 

DEFSTR a,b,c 
... .or there may be an inclusive range of first letters such as: 

DEFSTR a-z 
Associated keywords: DEFINT,DEFREAL 

DEG 

DEG 

DEG 

COMMAND: Sets DEGrees mode of calculation. The default condition for the 
functions SIN, COS, TAN, and ATN is radians. DEG resets BASIC to degrees until 
instructed otherwise by the commands RAD, and NEW, CLEAR, LOAD, RUN etc. 

Associated keywords: ATN, COS, RAD, SIN, TAN 
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DELETE 

DELETE <line number range> 

DELETE 100-200 

COMMAND: Deletes part of the current program as defined in the <line number 
range > expression. 

The first or last number in the <line number range > may be omitted to indicate 
'....from the beginning of the program', or '....to the end of the program', i.e: 

DELETE -200 
....or.... 

DELETE 50- 
,...or.... 

DELETE 
. . , .which deletes the whole program . 
Associated keywords: CHAIN MERGE, RENUM 

DERR 

DERR 

LOAD "xyz.abc" 

XYZ .ABC not found 

Ready 

PRINT DERR 

146 

FUNCTION: Reports the last error code returned by the disc filing system. The value 
of D E R R may be used to ascertain the particular Disc E R Ror that occurred. See the 
listing of error messages given in the chapter entitled 'For your reference....'. 

Associated keywords: ERL, ERR, ERROR, ON ERROR GOTO, RESUME 
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DI 

DI 



10 CLS:TAG:EVERY 10 GOSUB 90 

20 X1=RND*320:X2 = RNt>*320 

30 Y=200+RND*200:C$=CHR$(RND*255) 

40 FOR X=320-X1 TO 320+X2 STEP 4 $ 

50 DI 

60 HOVE 320,0,1:HOVE X-2,Y:HOVE X,Y 

70 PRINT " ";C$;:FRAHE 

80 EI:NEXT:GOTO 20 

90 HOVE 320,0:DRAW X+8,Y-1 6,0 : RETURN 

run 



COMMAND: Disables Interrupts (other than the [ESC] interrupt) until re-enabled 
explicitly by E I or implicitly by the R E T U R N at the end of an interrupt sub-routine. 

Note that entering an interrupt sub-routine automatically disables interrupts of an 
equal or lower priority. 

The command is used to make the program literally execute without interruption 
- for example when two routines within a program are competing for use of resources. 
In the example above, the main program and the interrupt sub-routine are competing 
for use of the graphics display. 

Further information concerning logic will be found in part 2 of the chapter entitled 
'At your leisure....'. 

Associated keywords: AFTER, EI, EVERY, REMAIN 
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DIM 

DIM <listof:<subscripted variable* 



10 CLS 

20 DIM f riend$(5) /P hone$(5) 

30 FOR n=1 TO 5 

40 PRINT "Friend number";n 

50 INPUT "Enter name";f ri end$(n> 

60 INPUT "Enter tel -number";phone$Cn) 

70 PRINT 

80 NEXT 

90 FOR n=1 TO 5 

100 PRINT n;friend$(n),phone$(n) 

110 NEXT 

run 



COMMAND: DIMensions an array. DIM allocates space for arrays and specifies 
maximum subscript values. BASIC must be advised of the space to be reserved for an 
array, or it will default to 10. 

An array is identified by a -subscripted variable* where one variable name is used 
with a range of subscript numbers, so that each 'element' of the array has its own 
individual value. Control of the array can then be achieved by for example FOR 
NEXT loops, which can step through the array, processing each element in turn. 

Note that the lowest value of the subscript is zero (i.e. the first available element in 
the array). 

Arrays can be multi-dimensional, and each element of such an array is referenced by 
its position within the framework of the array. For example, in an array dimensioned 

by: 

DIM posi tion$(20, 20,20) 
....an element of the array would be referenced for example: 

posi tion$(4,5,6) 
Associated keywords: ERASE 
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DRAW 

D R A W <x co-ordinate> , <y co-ordinate > [ , [ <ink> ][ , < ink mode>l ] 

10 MODE 0:BORDER 0:PAPER 0:INK 0,0 
20 x=RND*640:y=RND*400:z=RND*15 
30 DRAW x,y,z 
40 GOTO 20 
run 

COMMAND: Draws a line on the graphics screen, from the current graphics cursor 
position to the absolute position specified in the x,y co-ordinates. The <ink' in which to 
draw the line may be specified (in the range to 15). 

The optional <ink mode> determines how the ink being written interacts with that 
already on the graphics screen. The 4 <ink mode>s are: 

: Normal 

l:XOR (exclusive OR) 

2: AND 

3: OR 

Associatedkeywords: DRAWR, GRAPHICS PEN, MASK 



DRAWR 

D R A W R <x offset> / <y offset>[ , [<ink>l[ , <ink mode* 

10 CLS:PRINT "coming upstairs?" 

20 HOVE 0,350:FOR n=1 TO 8 

30 DRAWR 50,0 

40 DRAWR 0,-50 

50 NEXT:M0VE 348,0:FILL 3 

60 GOTO 60 

run 



COMMAND: Draws a line on the graphics screen, from the current graphics cursor 
position to the relative position specified in the <x and y offsets. The <ink> in which to 
draw the line may be specified (in the range to 15). 
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The optional <ink mode> determines how the ink being written interacts with that 
already on the graphics screen. The 4 <ink mode>s are: 

: Normal 

l:XOR (exclusive OR) 

2: AND 

3: OR 

Associatedkeywords:DRAW, GRAPHICS PEN, MASK 



EDIT 

EDIT <linenumber> 
EDIT 20 

COMMAND: Displays the program line specified in the <line number* on the screen 
together with the cursor, ready for editing. 

Associated keywords: AUTO, LIST 

£1 

EI 

EI 

COMMAND: Enables I nterrupts which have been disabled by the D I command. 

If interrupts are disabled in an interrupt sub-routine, they are automatically 
re-enabled when BASIC encounters the RETURN command at the end of the 

sub-routine. 

Further information concerning interrupts will be found in part 2 of the chapter 
entitled 'At your leisure....'. 

Associated keywords: AFTER, DI, EVERY, REMAIN 

ELSE 

(See I F) 
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END 

END 

END 

COMMAND: Ends the execution of a program, and returns to direct mode. Any 
number of E N D commands may appear in a program, and one is automatically 
assumed after the final line of a program. 

Associated keywords: STOP 



ENT 

E N T envelope number>[ , 'envelope section>][ , ^envelope section>] 

[, <envelope section>][ , ^envelope section-] 
[ , ^envelope section*] 

10 ENT 1,10,-50,10,10,50,10 
20 SOUND 1, 500, 200, 10, ,1 
run 

COMMAND: Sets the Tone ENvelope specified in the envelope number* (in the 
range 1 to 15), which is used in conjunction with the SOUND command. If the 
envelope number* is negative (in the range -1 to -15), the envelope repeats until the 
end of the duration of the SOUND command. 

Each of the ^envelope section* s may contain either 2 or 3 parameters: 

If 3 parameters are used, these are: 

<number of steps* , <stepsize> , <pausetime> 

Parameter 1: <number of steps* 

This parameter specifies how many different steps of tone (pitch) you want the sound 
to pass through during the envelope section. For example, in a section of a note which 
lasts 10 seconds, you may wish to have 10 tone steps of 1 second each. In such a case, 
the <number of steps* parameter used should be 10. 

The available range of <number of steps* is to 239. 
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Parameter 2: «step size* 

This parameter must be in the range - 128 to +127. Negative steps make the pitch of 
the note higher; positive steps make the pitch of the note lower. The shortest tone 
period is 0. The full range of tone periods is shown in the chapter entitled 'For your 
reference....'. 

Parameter 3: <pause time> 

This parameter specifies the time between steps in 0.01 second (hundredths of a 
second) units. The range of <pause time> numbers is to 255 (where is treated as 
256), which means that the longest time between steps is 2,56 seconds. 

If 2 parameters are used, these are: 

<toneperiod> , pause time> 

Parameter 1: -tone period* 

This parameter gives a new absolute setting for the tone period. (See Parameter 2 of 
the S U N D command.) 

Parameter 2: <pause time > 

This parameter specifies the pausing time in 0.01 second (hundredths of a second) 
units. The range of <pause time> numbers is to 255 (where is treated as 256), or 
2.56 seconds. 

General 

Note that the total length of all the <pause time>s should not be greater than the 
'duration > parameter in the SOUND command, otherwise the sound will finish before 
all the tone steps have been passed through. (In such a case, the remaining contents of 

the tone envelope are discarded.) 

Likewise, if the <duration> parameter in the SOUND command is longer than the 
total length of all the <pause time>s, the sound will continue after all of the tone steps 
have been passed through, and will remain constant at the final tone pitch. 

Up to 5 different -envelope sections, (each made up of the above 2 or 3 parameters) 
may be used in an E N T command. 

The first step of a tone envelope is executed immediately. 

Each time a given tone envelope is set, its previous value is lost. 

Specifying an < envelope number, with no < envelope section* s cancels any previous 

setting. 

Further information concerning sound will be found in part 2 of the chapter entitled 
'At your leisure. . . .'. 

Associated keywords: ENV, SOUND 
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ENV 

E N V <envelope number >[ , <■ envelope section >]L / < envelope section>J 

f , <envelope section>][ , < envelope section >] 
[, <envelope section*] 

10 ENV 1,15,-1,10,15,1,10 
20 SOUND 1,200,300,15,1 
run 

COMMAND: Sets the Volume ENvelope specified in the ^envelope number* (in the 
range 1 to 15), which is used in conjunction with the SOUND command. 

Each of the envelope sections may contain either 2 or 3 parameters: 

If 3 parameters are used, these are: 

-number of steps> , <stepsize> , <pausetime> 

Parameter 1: <number of steps* 

This parameter specifies how many different steps of volume you want the sound to 
pass through during the envelope section. For example, in a section of a note which 
lasts 10 seconds, you may wish to have 10 volume steps of 1 second each. In such a 

case, the <number of steps* parameter used should be 10. 

Theavailablerangeof<numberofsteps>is0tol27. 

Parameter 2: <step size> 

Each step can vary in size from a volume level of to 15 with respect to the previous 
step. The 16 different volume levels are the same as those you will hear in the SOUND 
command. However, the <step size* parameter used can be between -128 and +127; 
the volume level re-cycling to after each 15, 

Parameter 3: <pause time> 

This parameter specifies the time between steps in 0.01 second (hundredths of a 
second) units. The range of <pause time* numbers is to 255 (where is treated as 
256), which means that the longest time between steps is 2.56 seconds. 
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If 2 parameters are used, these are: 
<hardwareenvelope> , <envelopeperiod> 

Parameter 1: <hardware envelope* 

This parameter specifies the value to send to the envelope shape register of the the 
sound chip. 

Parameter2: -envelope period* 

This parameter specifies the value to send to the envelope period registers of the 
sound chip. 

Knowledge of hardware is assumed when using hardware envelopes. Unless you 
have such knowledge, it is suggested that you use a software envelope incorporating 
a suitable pause time> parameter. 

General 

Note that the total length of all the <pause time>s should not be greater than the 
<duration> parameter in the S U N D command, otherwise the sound will finish before 
all the volume steps have been passed through. (In such a case, the remaining 
contents of the volume envelope are discarded.) 

Likewise, if the .duration* parameter in the SOUND command is longer than the 
total length of all the pause time*s, the sound will continue after all of the volume 
steps have been passed through, and will remain constant at the final level. 

Up to 5 different envelope sections, (each made up of the above 2 or 3 parameters) 
may be used in an E N V command. 

The first step of a volume envelope is executed immediately. 

Each time a given volume envelope is set, its previous value is lost. 

Specifying an .envelope number* with no .envelope sections cancels any previous 

setting. 

Further information concerning sound will be found in part 2 of the chapter entitled 
'Atyour leisure....'. 

Associated keywords: ENT, SOUND 
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EOF 

EOF 

10 OPENIN "exl.bas" 

20 WHILE NOT EOF 

30 LINE INPUT #9,a$ 

40 PRINT a$ 

50 WEND 

60 CLOSEIN 

run 

FUNCTION: Tests to see if the disc input is at End Of File. Returns -1 (true) if no file 
is open or file is at the end, otherwise returns (false). 

Associated keywords: OPENIN, CLOSEIN 

ERASE 

ERASE <listof:<variablename> 

DIM a(100),b$(100) 
ERASE a,b$ 

COMMAND: Erases the contents of an array no longer required, reclaiming the 
memory for other use . 

Associated keywords: DIM 

ERL 

ERL 

10 ON ERROR GOTO 30 

20 GOTO 1000 

30 PRINT "error is in Line";ERL 

40 END 

run 

FUNCTION: Reports the Line number of the last ERror encountered. In the above 
example you will see that the error is in line 2 0, and has been reported so by the ERL 
function. 

Associated keywords: D ERR, ERR, ERROR, ON ERROR GOTO, RESUME 
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ERR 

ERR 

GOTO 500 

Li ne does not exist 
Ready 
PRINT ERR 
8 

FUNCTION: Reports the number of the last E R Ror encountered. See the listing of 
error messages given in the chapter entitled 'For your reference....'. In the above 
example you will see that ERRor number 8isa'Li ne does not exi st'error. 

Associatedkeywords:D£RR,ERL, ERROR, ON ERROR GOTO, RESUME 

ERROR 

ERROR <integer expression* 

10 IF INKEY$= M " THEN 10 ELSE ERROR 17 
run 

COMMAND: Invokes the error specified in the 'integer expression*. A listing of error 
messages 1 to 32 is given in the chapter entitled 'For your reference....'. BASIC will 
treat the ERROR as if it had been detected as genuine, and will jump to any error 
handling routine, as well as reporting the appropriate values of E R R and E R L. 

ERROR accompanied by an integer expression* in the range 33 to 255 can be used to 
create customised error messages, as shown in the following example: 

10 ON ERROR GOTO 100 

20 INPUT "enter one character"; a$ 

30 IF LEN(a$)<>1 THEN ERROR 100 

40 GOTO 20 

100 IF ERR=100 THEN 110 ELSE 130 

110 PRINT CHR$C7) 

120 PRINT "I said ONE character!" 

130 RESUME 20 

run 

Associatedkeywords:ERL,ERR,ON ERROR GOTO, RESUME 
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EVERY 

EVERY <time period>[ , -timer number>l G S U B -line number* 

10 EVERY 50,1 GOSUB 30 

20 GOTO 20 

30 SOUND 1,20 

40 RETURN 

run 

COMMAND: Calls a BASIC sub-routine at regular intervals. The -time period- 
specifies the interval in units of 0.02 (fiftieths) second. 

The -timer number- (in the range to 3) specifies which of the four delay timers are to 
be used. Timer 3 has the highest priority; timer (the default timer) has the lowest. 

Each of the timers may have a sub- routine associated with it. 

Further information concerning interrupts will be found in part 2 of the chapter 
entitled 'At your leisure....'. 

Associated keywords: AFTER, REMAIN 
EXP 

E X P ( ^numeric expression* ) 

PRINT EXPC6.876) 
968.743625 

FUNCTION: Calculates 'E' to the power given in the <numeric expression*, where 'E' 
is approximately 2.7182818 - the number whose natural logarithm is 1. 

Associated keywords: LOG 

FILL 

FILL <ink> 

10 MODE 1:sea=2:M0VE 0,200,3 
20 DRAWR 100,-100:DRAWR 220,0 

30 MOVER 10,0:DRAWR 220,0 
40 DRAWR 100,100:MOVE 0,0 
50 FILL sea 
run 

COMMAND: Fills an arbitrary area of the graphics screen. The edges of the area are 
bounded by lines drawn either in the current graphics pen ink or in the ink being used 
to fill (in the range to 15). 

The fill starts from the current graphics cursor position, If this position lies on an 
edge, nothing will be filled. 

Associated keywords: GRAPHICSPEN 
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FIX 

F I X ( ^numeric expression ) 

PRINT FIX(9. 99999) 
9 

FUNCTION: Removes the part of ^numeric expression* to the right of the decimal 
point, rounding towards zero. 

Associated keywords: CINT, INT, ROUND 

FN 

(See DEF FN) 

FOR 

FOR<simplevariable> = <start> TO <end>[STEP *size>] 

10 FOR n = 2 TO 8 STEP 2 

20 PRINT n; 

30 NEXT n 

40 PRINT ",who do we appreciate?" 

run 

COMMAND: Carries out the body of program between the FOR and NEXT 
commands, a given number of times, stepping the control variable between a <start> 
and <end> value. If the STEP <size> is not specified, 1 is assumed. 

The STEP <size> may be specified as a negative mumeric expression* in which case 
the value of the <start> parameter must be greater than that of the <end> parameter, 
otherwise the control variable will not be stepped. 

FOR NEXT loops may be 'nested', i.e. one may be carried out within another, within 
another, and so on. 

Assigning the variable's name to the NEXT command is optional as BASIC will 
automatically find which FOR command is to be associated with an 'anonymous' 
NEXT. 

Associated keywords: NEXT, STEP, TO 
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FRAME 

FRAME 



10 MODE 

20 PRINT "FRAME off" 

30 TAG 

40 MOVE 0,200 

50 FOR x=0 TO 500 STEP 4 

60 IF f=1 THEN FRAME 

70 MOVE x,200 

80 PRINT " ";CHR$(143>; 

90 NEXT 

100 IF f=1 THEN RUN 

110 CLS 

120 TAGOFF 

130 PRINT "FRAME on" 

140 f=1 

150 GOTO 30 

run 



COMMAND: Synchronises the writing of graphics on the screen, with the frame 
flyback of the display. The overall effect of this is that character or graphics 
movement on the screen will appear to be smoother, without 'flickering' or 'tearing'. 



Associated keywords: TAG, TAGOFF 



FRE 

F R E ( mumeric expression) ) 
F R E ( <string expression ) 

PRINT FRE(0) 
PRINT FRE<""> 

FUNCTION: Establishes how much F R Ee memory remains unused by BASIC. The 
form F R E < " " ) forces a 'garbage collection' before returning a value for available 
space. 

Associated keywords: HIMEM,MEMORY 
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GOSUB 

GOSUB <linenumber> 

GOSUB 210 

COMMAND: GOes to a BASIC SUB-routine by branching to the specified <line 
number >. The end of the sub-routine itself is marked by the command RETURN, 
whereupon the program continues execution from the instruction after the invoked 
GOSUB command. 

Associated keywords: RETURN 

GOTO 

GOTO <line number* 

GOTO 90 
COMMAND: GOes TO aspecified line number. 
Associated key words: none 

GRAPHICS PAPER 

GRAPHICS PAPER<ink> 

10 MODE 

20 MASK 15 

30 GRAPHICS PAPER 3 

40 DRAW 640,0 

run 

COMMAND: Sets the <ink> of the graphics paper, i.e. the area behind graphics drawn 
on the screen. When drawing continuous lines, the graphics paper will not be seen. In 
the above example, the MASK command enables a broken line to be drawn, and the 
graphics paper to be seen. 

The graphics paper's ink (in the range to 15) is used for the 'paper' area of characters 
written when TAG is in operation, and as the default when clearing the graphics 
window, using C L G , 

Associated keywords: CLG, GRAPHICS PEN, INK, MASK, TAG, TAGOFF 
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GRAPHICS PEN 

GRAPHICS PEN [<ink>][,<backgroundmode>] 

10 MODE 

20 GRAPHICS PEN 15 

30 MOVE 200,0 

40 DRAW 200,400 

50 MOVE 639,0 

60 FILL 15 

run 

COMMAND: Sets the <ink>, (in the range to 15) to be used for drawing lines and 
plotting points. The graphics 'background mode> can also be set to either: 

: Opaque background 

1 : Transparent background 

(Transparent background affects the graphics paper of characters written with TAG 
on, and the gaps in dotted lines.) 

Either parameter may be omitted, but not both. If a parameter is omitted, that 
particular setting is not changed. 

Associated keywords: GRAPHICS PAPER, INK, MASK, TAG, TAGOFF 



HEX$ 

H E X $ ( < unsigned integer expression^ , <field width>] ) 

PRINT HEX$(255,4) 

00FF 

FUNCTION: Produces a String of H E Xadecimal digits representing the value of the 
<unsigned integer expression*, using the number of hexadecimal digits instructed by 
the <field width> (in the range to 16). If the number of digits instructed is too great, 
the resulting expression will be filled with leading zeros; if the number of digits 
instructed is too small, the resulting expression will NOT be shortened to the 
instructed number of digits, but will be produced in as many digits as are required. 

The -unsigned integer expression* to be converted into hexadecimal form must yield 
a value in the range -32768 to 65535. 

Associated keywords: B I N$, DECS, STR$, UNT 
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HIMEM 

HIMEM 

PRINT HIMEM 
42619 

FUNCTION: Returns the address of the H Ighest byte of MEMory used by BASIC, 
(which may be altered by the MEMORY command). 

Associated keywords: F RE, MEMORY, SYMBOL, SYMBOL AFTER 
IF 

I F <logical expression* THEN <option part* [ELSE <option part*] 

10 MODE 1 

20 x=CINT(RND*100) 

30 PRINT "Guess my number (0 to 100)" 

40 INPUT n 

50 IF n<x THEN PRINT n;"is too Low..." 

60 IF n>x THEN PRINT n;"is too high..." 

70 IF n=x THEN 80 ELSE c=c+1:G0T0 40 

80 PRINT "Well done, you got it in"; 

90 PRINT c+1;"guesses! M 

run 

COMMAND: Determines whether the <logical expression* is true, in which case the 
first <option part> is executed. If the logical expression* is false, any <option part* 
specified in the ELSE clause is executed, otherwise BASIC passes onto the next line. 

IF THEN commands may be nested to any depth, and are terminated by end of line. 
Therefore it is NOT possible to have further statements which are independent of the 
I F THEN command, on the same line. 

Where the result of the < logical expression* requires that a line should be jumped to, 
the command may be given as either: 

Examples.... 

IF a = 1 THEN 100 

....or.... 

IF a=1 GOTO 100 
....or.... 

IF a=1 THEN GOTO 100 
Associated keywords: ELSE, GOTO, THEN 
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INK 






INK<ink>,<colour>[ / <colour>J I f ^ -$ / o 

10 MODE 1: PAPER 0:PEN 1 ct <~ :: P l 

20 FOR p = TO 1 

30 FOR i=0 TO 26 

40 INK p,i 

50 LOCATE 16 y 12: PRINT "i nk";p; ","; i 

60 FOR t=1 TO 400:NEXT t,i,p 

70 INK 0,1 :INK 1,24:CLS 

run 

COMMAND: Assigns colour(s) to a given ink. The <ink> parameter describes the ink 
reference, which must be an integer expression in the range to 15, for use in the 
appertaining PEN or PAPER command. The first <colour> parameter should be an 
integer expression yielding a colour value in the range to 26. If an optional second 
<colour> is specified, the ink alternates between the two colours, at a rate determined 
by the SPEED I N K command. 

Depending upon the current screen mode, a number of I N Ks are available. See the 
table of colour values given in Foundations 8, table 1. 

Associated keywords: GRAPHICS PAPER, GRAPHICS PEN, PAPER, PEN, 
SPEEDINK 



INKEY 

I N K E Y ( (integer expression* ) 

10 IF INKEY(55)<>32 THEN 10 

20 PRINT "You've pressed [SHIFT] and V" 

30 CLEAR INPUT 

run 

FUNCTION: I Nterrogates the KE Yboard to report which keys are being pressed. 
The keyboard is scanned every 0.02 (fiftieth) second. 

The function is useful for spotting whether a certain key is down or up, by detecting 
the returned value of - 1 (which occurs regardless of [SHIFT] and [CTRL] key status). 

The above example detects when [SHIFT] and V (key number 55) are pressed together, 
then ends the program. An illustration of key numbers will be found in the diagram 
at the top right hand side of the computer, and in the chapter entitled 'For your 

reference....'. 



Complete List of Keywords Chapter 3 Page 33 



The state of [SHIFT] and [CTRL] in conjunction with the key specified in the (integer 
expression* is identified as follows: 



Value returned 


[SHIFT] 


[CTRL] 


specified key 


-1 


UP/DOWN 


UP/DOWN 


UP 





UP 


UP 


DOWN 


32 


DOWN 


UP 


DOWN 


128 


UP 


DOWN 


DOWN 


160 


DOWN 


DOWN 


DOWN 



Associated keywords: CLEAR INPUT, I NKEYS, J OY 



INKEY$ 

INKEYS 



Ca// &.fj f£f$Ot> 



•fr t-i; ■ 



rf 



10 CLS 

20 PRINT "SeLect Yes or No (Y/N)?" 

30 a$=INKEY$ 

40 IF aJ="" THEN 30 

50 IF a$="y" OR a$="Y" THEN 80 

60 IF a$="n" OR a$="N" THEN 90 

70 GOTO 30 

80 PRINT "You have selected YES":END 

90 PRINT "You have selected NO" 

run 

FUNCTION: I Nterrogates the K E Yboard, returning the current String reflecting 
any key that is pressed. If no key is pressed, I N K E Y $ returns an empty string. In the 
above example, lines 40 and 70 tell the program to loop back to line 30 after 
interrogating the keyboard string. 



Associated keywords: CLEAR INPUT, INKEY 



INP 

I N P C <port number* ) 

PRINT INP(&FF77) 
255 






-v/ 






iC-r 



,fccj 



S-~ ~' : 



fit 



4 *f>(* Fi ~°°)<!k}9 



FUNCTION: Returns the I N Put value from the I/O address specified in the <port 
number*. 

Associated keywords: U T , U A I T 
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INPUT 

I N P U T[# <stream expression* ,11; Jl<quoted string><separator> 1 

<listof:«variable> 

10 MODE 1 

20 INPUT "Give me two numbers for mu Lt i p Li ca t i on, 

(separated by a comma)";a,b 
30 PRINT a;"times";b;"is";a*b 
40 GOTO 20 
run 

COMMAND: Accepts data input from the stated stream, (from stream #0 if not 
specified). 

The first, optional semicolon [; ] suppresses the carriage return/line feed that will 
otherwise oecur after the command is executed. 

The <separator> must either be a semicolon or comma. A semicolon causes a question 
mark to be displayed; a comma suppresses the question mark. 

If an entry is made that is of the wrong type such as if the letter o is typed instead of a 
(zero) when INPUT ing a numeric variable, then BASIC will respond with: 

?Redo from start 

. ...and any original prompt text that you programmed. 

All responses from the keyboard must be terminated by pressing the [ENTER] key. 

Associated keywords: LINE INPUT 
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INSTR 

I N S T R ( [<start position* ,]<searched string> , <searchedfor string> ) 



10 CLS:FOR n=1 TO 26 

20 alphabet$=alphabet$+CHR$(n+64> 

30 NEXT 

40 INPUT "Enter a letter";a$ 

50 b$=UPPER$(a$) 

60 PRINT b$;" is number"; 

70 PRINT INSTR(aLphabet$,b$); 

80 PRINT "in the a tphabet . " : PRINT 

90 GOTO 40 

run 



FUNCTION: Searches the first ^searched string> expression to find the <searched for 
string* expression, and reports the position of its first occurrence within the -searched 
string* . If the -searched for string- does not occur within the -searched string*, then 
is reported. 

The position at which to start searching the <searched string> is optionally specifiable 
using the -start position* parameter which must yield an integer number in the range 
1 to 255. 

Associated keywords: none 



INT 

I N T ( mumeric expression* ) 

PRINT INT<-1.995) 
-2 

FUNCTION: Rounds the number to the nearest smaller INTeger, removing any 
fractional part. Returns the same value as F I X for positive numbers, but returns one 
less than F I X for negative numbers which are not already integers. 

Associated keywords: CINT, FIX, ROUND 
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JOY 

J OY ( < integer expression* ) 

10 PRINT "To stop the program - "; 

20 PRINT "operate joystick" 

30 IF JOYC0)<>0 THEN END 

40 GOTO 10 

run 

FUNCTION: Reads a bit-significant result from the JOYstick specified in the 

<integerexpression> (either or 1 ). 

Bit Decimal 

0:Up 1 

l:Down 2 

2: Left 4 

3: Right 8 

4: Fire 2 16 

5: Fire 1 32 

Hence for example, if the main 'fire' button (Fire 2) on the first joystick is pressed 
while the joystick handle is being moved left, the function JOY (0) returns a 
decimal value of 20, corresponding to 16 (Fire 2) + 4 (Left). 

Further information concerning joysticks will be found in the chapter entitled 'For 
your reference....'. 

Associated keywords: CLEAR INPUT, IN KEY 

KEY 

KEY <expansion token number* , -string expression* 

KEY ll/'border 13:paper 0:pen 1 : i nk 0,13: 

ink 1,0:mode 2 : Li st" + CHR$< 13) 

....now press the small [ENTER] key. ■■■': 

COMMAND: Assigns the -string expression* to the key's 'expansion token number* 
specified. Thirty-two expansion tokens are supported, in the range to 31, these 
occupying the keyjajues 128 to 159. Keys 128 (0 on numeric keypad) to 140 ([CTRL] 
[ENTER] on numeric keypad) are by default assigned to print numbers to 9, a 
decimal point, [ENTER] and RUN"[ENTER] - (for cassette operation), but may be 
re-assigned to other -string expression's as required. Expansion tokens 13 to 31 (key 
values 141 to 159) are empty strings by de fault, but may be be expanded and assigned 
to keys, using the K"E"Y D E F command described in the next example. 

s*{^ n v^/ /t// '*■--•■ <"*j 

F 
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/ tw ^ ^Stf« ^.z 6V^/W 



-J, <"■?'.''' £*■*'*.* '-'***": it* J..tl*-*-*T J'- ^-t,y i- W S ■*■■* ■ ''-''^ '' < -^ t / 



y >: *,., fay m] " - ■ ■ ■ " 

The <expansion token number> given in the KEY command may be in the range to 
31, or optionally 128 to 159 to reflect the key values. (See the key illustration in the 
chapter entitled 'For your reference....'.) 

A total of 120 characters may be expanded into the -string expressions. Attempting 
toover-expandwillproducean'Imp roper a rgument'error(5). 

Associated keywords: K E Y D E F 

KEY DEF • - ^ 

\ 

KE Y D E F < key numbe r* , <repeat>[ , <normal>[, <shifted>[ , <control>]]] 



KEY, 1597'this\is the tab key" 

key ' be> ,<ai.^i*> «*-■ ^ . E&r^ ,- '-<<> "s 

....now press the [TAB] key. * d 

COMMAND: DE Fines the KEY yjahj^to be returned by the specified <key number* 
in the range to 79 (for an illustration of key numbers, refer to the diagram at the top 
right hand side of the computer, or to the chapter entitled 'For your reference..,.'). The 
<normal>, <shifted>, and <control> parameters should contain the values r equired to be 
returned when the key is pressed, alone, together with [SHIK], ampiagether with 
[CTRL], respectively. Each of these parameters is optional. jj^ <*~2^%j\ i & -% 

The <repeat> parameter enables you to set the key auto-repeat function on or off ( 1 or 
0), the rate of auto-repeat being adjustable by use of the SPEED KEY command. 

In the above example, key 159 (equivalent to expansion token 31) is first assigned to 
an expansion string, then the KEY DEF command defines key 68 (the [TAB] key) 
to auto-repeat ( 1 ), and to return the <normal> value 159 when pressed alone. 

In the above example, normal action would be restored by: 

KEY DEF 68,0,9 ^ 

....where9isthenormalASCIIvaluefor|TAB] / ■--*- i 

Associated keywords: KEY, SPEED KEY 
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-*-*- 



LEFT$ 

LE F T $ C <string expression- , -required length* ) 



■/ r 3) 



■■(./• 



10 CLS 

20 a$="AMSTRAD" 

30 FOR n=1 TO 7 

40 PRINT LEFT$(a$,n) 

50 NEXT 

run 

FUNCTION: Returns the number of characters (in the range to 255) specified in the 
-required length- parameter, after extracting them from the LEFT of the < string 
expression*. If the -string expression- is shorter than the -required length-, the whole 
<string expression- is returned. 

Associated keywords: MID$, RIGHTS 
LEN 

LEN (-string expression-) 

10 LINE INPUT "Enter a phrase";a$ 

20 PRINT "The phrase is"; 

30 PRINT LEN(a$);"characters Long." 

run 

FUNCTION: Returns the total number of characters (i.e. the LENgth) of the -string 
expression* , 

Associated keywords; none 

LET 

LET <variable> = -expression> 

LET x=100 

COMMAND: Assigns a value to a variable. A remnant from early B ASICs where 
variable assignments had to be 'seen coming'. Has no use in AMSTRAD BASIC apart 
from providing compatibility with the programs supplied in early BASIC training 
manuals. The above example need only be typed in: 

x = 100 

Associated keywords: none 
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LINE INPUT 



e{l 



LINE I N PUT[#<stream expression*, ][;][<quotedstring><separator>] 

<string variable* 

10 LINE INPUT "Type a Line of texf'jaS 

20 CLS 

30 PRINT "The variable a$ now equals:-" 

40 PRINT a$ 

run 

COMMAND: Accepts input of an entire line of text from the stream indicated, (from 
stream #0 if not specified). The first, optional semicolon [;] suppresses ther carriage 
return/line feed that will otherwise occur after the command is executed. 

The <separator> must either be a semicolon or comma. A semicolon causes a question 
mark to be displayed; a comma suppresses the question mark. 

LINE INPUT from the keyboard is terminated by pressing the [ENTER] key. 

LINE INPUT from disc (or cassette) stream # 9 is terminated by a received carriage 
return, or by the <string variable* being assigned 255 characters, whichever is the 
sooner. 

Associated keywords: INPUT 



LIST 

LI ST[<line number range>]L/#<stream expression*] 

LIST 100-1000, #1 

COMMAND: Lists program lines to the given stream. Stream #0 is the default 
screen stream, and # 8 is the printer. LIS Ting may be paused by pressing [ESC] 
once, and re-started by pressing the space bar. Pressing [ESC] twice will abandon the 
listing and return to direct mode . 

The first or last number in the <line number range> may be omitted to indicate 
'... .from the beginning of the program', or'. ...to the end of the program', i.e: 

LIST -200 
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....or.... 

LIST 50- 
....or.... 

LIST 
....which lists the whole program. 
Associated keywords: none 

LOAD 

LOAD <filename>[ , ^address expression?] 

LOAD "discf i le . xyz" ,&2AF8 

COMMAND: Loads a BASIC program from disc into memory, replacing any existing 
program. Specifying the optional < address expression* will cause a binary file to be 
loaded at that address, rather than the address from which it was saved. 

A Protected BASIC program can NOT be loaded using the LOAD command as it will 
be immediately deleted from memory. Instead, use the RUN or CHAIN commands. 

Associated keywords: CHAIN, CHAIN MERGE, MERGE, RUN, SAVE 

LOCATE 

L C A T E [ # <stream expression* , ]<x co-ordinate > , <y co-ordinate' 

10 MODE 1 

20 FOR n=1 TO 20 

30 LOCATE n,n 

40 PRINT CHR$(143);"location"; 

50 PRINT n;",";n 

60 NEXT 

run 

COMMAND: Locates the text cursor at the stream indicated, to the position specified 
by the x and y co-ordinates, with 1,1 being the top left corner of the stream (window). 
Stream U is the default stream. 

Associated keywords: WINDOW 



Complete List of Keywords Chapter 3 Page 41 



i 



LOG 

LO G C <numeric expression* ) 

PRINT L0G<9999) 
9.21024037 

FUNCTION: Calculates the natural LOGarithm of the -numeric expression* which 
must be greater than zero. 

Associated keywords: EXP, LOG 1 

LOG 10 

LOG 10 (<numeric expression*) 

PRINT LOG10C9999) 
3.99995657 

FUNCTION; Calculates the LOGarithm to base 10 of the -numeric expression* 
which must be greater than zero. 

Associated keywords: EXP, LOG 

LOWERS 

LOWE R$ C <string expression* ) 

10 a$="SEE HOW THE LETTERS CHANGE TO " 
20 PRINT LOWER$(a$+"L0WER CASE") 

run 

FUNCTION: Returns a new string expression which is a copy of the specified <string 
expression* but in which all alphabetic characters in the range A to Z are converted to 
lower case. The function is useful for processing input which may come in mixed 
upper/lower case. 

Associated keywords: UPPERS 
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MASK 

MASK [<integer expression*] [ , < first point setting'] 



10 CLS:TAG 

20 MASK 1:M0VE 0,250:DRAWR 240,0 

30 PRINT "(binary 00000001 in mask)"; 

40 MASK 3:M0VE 0,200:DRAWR 240,0 

50 PRINT "(binary 00000011 in mask)"; 

60 MASK 7:M0VE 0,150:DRAWR 240,0 

70 PRINT "(binary 00000111 in mask)"; 

80 MASK 15 :M0VE 0,100:DRAWR 240,0 

90 PRINT "(binary 00001111 in mask)"; 

run 



COMMAND: Sets the 'mask' or template to be used when drawing lines. The binary 
value of the 'integer expression* in the range to 255, sets the bits in each adjacent 
group of 8 pixels to ON (1), or OFF (0). 

The <first point setting* determines whether the first point of the line is to be plotted 
(1) or not plotted (0). 

Either of the parameters may be omitted, but not both. If a parameter is omitted, that 
particular setting is not changed. 

Associated keywords: DRAW, DRAWR, GRAPHICS PAPER, GRAPHICS PEN 



MAX 

MAX (<listof:<numeric expression*) 

10 n=66 

20 PRINT MAX(1,n,3,6,4,3> 

run 
66 

FUNCTION: Returns the H A Ximum value from the <list of: -numeric expression's. 

Associated keywords: M I N 
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MEMORY 

MEMORY <address expression> 

MEMORY &20AA 

COMMAND: Allocates the amount of BASIC memory available by setting the 
address of the highest byte. 

Associatedkey words: F RE, HIMEM, SYMBOL, SYMBOL AFTER 

MERGE 

MERGE<filename> 

MERGE "newload.bas" 

COMMAND: Loads a program from disc, and adds it to the current program in the 
memory. 

Note that line numbers in the old program which exist in the new program to be 
M E R G E d, will be over- written by the new program lines. 

Protected files, (S A V Ed by , p ) can NOT be M E R G Ed into the current program. 
Associated keywords: CHAIN, CHAIN MERGE, LOAD 

MID$ 

M 1 0$( -string expression*, -start position*^ <sub-string length*]) 

10 MODE 1:Z0NE 3 

20 a$="ENCYCLOPAEDIA" 

30 PRINT "Show me how to spell ";a$ 

40 PRINT "OK ":PRINT 

50 FOR n=1 TO LEN(a$) 

60 PRINT MID$(a$,n / 1) / 

70 FOR t=1 TO 700:NEXT t,n 

80 PRINT:PRINT 

90 INPUT "Now enter another word";a$ 

100 GOTO 50 

run 
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FUNCTION: Returns a new sub-string, commencing at the <start position' of the 
-string expression*, being <sub-string length* characters long. If the <sub-string 
length- parameter is not specified, the remainder of the -string expression* after the 
-start position* is returned. 

If the <start position* is greater than the total length of the -string expression*, then 
an empty string is returned. The range of <start position* is 1 to 255. The range of 
-sub-string length* isOto 255. 

Associated keywords: LEFTS, RIGHTS 
MID$ 

M I D $ ( <string variable* , -insertion position*! , <new string length* ] ) 

= new string expression* 

10 a$="hello" 

20 MID$(a$,3,2)="XX" 

30 PRINT a$ 

run 

heXXo 

COMMAND: Inserts the mew string expression* into the string specified by the 
-string variable>, commencing at the -insert position*, and occupying <new string 
length* number of characters. 

Note that when using M I D $ as a COMMAND, a string variable* such as a $ must be 
used, and NOT a string constant such as "he L Lo". 

Associated keywords: LEFTS, RIGHTS 



MIN 

M I N C -list of: 'numeric expression* ) 

PRINT MIN(3,6,2.999,8 / 9,) 
2.999 

FUNCTION: Returns the M I Nimum value from the <list of: -numeric expressions. 
Associated keywords: MAX 
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MOD 

<argument> HOD <argument> 



PRINT 10 HOD 3 

1 
PRINT 10 HOD 5 





OPERATOR: Returns the remainder after dividing the first <argument> by the 
second < argument) and removing any integer component- MO Dulus. 

Associated keywords: none 



MODE 

MODE <integerexpression> 



10 m=1 

20 PRINT "this is irode";m 

30 PRINT "now press a key" 

40 IF INKEY$="" THEN 40 

50 m=m+1:IF m>2 THEN m=0 

60 HODE m 

70 GOTO 20 

run 



COMMAND: Changes the screen mode (0,1 or 2), and clears the screen to ink (which 
may not be the current paper ink). All text and graphics windows are reset to the 
whole screen, and text and graphics cursors are homed to their respective origins. 



Associated keywords: ORIGIN, WINDOW 
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MOVE 

MO V E x co-ordinate- , <y co-ordinate >[ , [tink>H , <ink mode>]] 

10 MODE 1 :TAG 

20 x=RND*800-100:y=RND*430 

30 MOVE x,y 

40 PRINT "I moved here"; 

50 GOTO 20 

run 

COMMAND: Moves the graphics cursor to the absolute point specified by <x 
co-ordinate* and <y co-ordinate*. The optional <ink> parameter may be used to change 
the graphics pen ink, in the range to 15. 

The optional <ink mode> determines how the ink to be written next, will interact with 
that already on the graphics screen. The 4 <ink mode>s are: 

: Normal 

l:XOR (exclusive OR) 

2: AND 

3: OR 

Associated keywords: MOVER, ORIG IN, XP0S,YP0S 

MOVER 

M V E R <x offset- , <y offset>[, [<ink> JL , <ink mode>]] 

10 MODE 1:TAG:M0VE 0,16 

20 PRINT "Life has its"; 

30 FOR n=1 TO 10 

40 HOVER -32,16 

50 PRINT "ups"; :NEXT: PRINT " and"; 

60 FOR n-1 TO 10 

70 MOVER -64,-16 

80 PRINT "downs";:NEXT 

run 

COMMAND: Moves the graphics cursor to a point relative to its current position. The 
relative position is specified by <x offset> and <y offset*. The optional <ink> parameter 
may be used to change the graphics pen ink, in the range to 15. 

The optional <ink mode> determines how the ink to be written next, will interact with 
that already on the graphics screen. The 4 <ink mode-s are: 

: Normal 

l:XOR (exclusive OR) 

2: AND 
3: OR 

Associated keywords: MOVE, ORIG I N,XP0S,YP0S 
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NEW 

NEW 

NEW 

COMMAND: Deletes the current program and variables in the memory. Key 
definitions are not lost, display characteristics i.e. MODE, PEN, PAPER, INK etc, are 
not changed, and the screen is not cleared. 

Associated keywords: none 

NEXT 

NEXT [<listof:<variable>] 

10 FOR a=1 TO 3 

20 FOR b=0 TO 26 

30 MODE 1 

40 PEN a:B0RDER b 

50 PRINT "pen";a;"border";b 

60 FOR c=1 TO 500 

70 NEXT c,b,a 

run 

COMMAND: Marks the end of a FOR loop. The NEXT command may be anonymous, 
or may refer to its matching FOR. Note from the above example that the <list 
of:< variables must appear in reverse order to their matching FOR commands, so that 
'nested' loops do not overlap. 

Associated keywords: FOR, RESUME, STEP, TO 

NOT 

NOT -argument* 

IF NOT "alan"<"bob" THEN PRINT "correct" ELSE PRINT "wrong" 
wrong 

IF NOT "cat">"dog" THEN PRINT "correct" ELSE PRINT "wrong" 
correct 

PRINT NOT -1 


PRINT NOT 
-1 

OPERATOR: Performs bit-wise operations on integers. Inverts each bit in the 
argument. 

Further information concerning logic will be found in part 2 of the chapter entitled 

'Atyour leisure....'. 

Associated keywords: AND,0R,X0R 
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ON BREAK CONT 

ON BREAK CONT 



10 ON BREAK CONT 

20 PRINT "The program wiLL CONTinue when you try to 

*8reak* using CESC]" : PRINT 
30 FOR t=1 TO 1000:NEXT:GOTO 20 
run 



COMMAND: Cancels the action of the [ESC] key from stopping the program, and 
instead CON Tinues execution. Care should be taken when using this command, as 
the program will continue until the computer is completely reset; hence you should 
SAVE such a program before R U Nning it. 

ON BREAK CONTmaybedisabledwithinaprogrambyON BREAK STOP. 

Associated keywords: ON BREAK GOSUB, ON BREAK STOP 

ON BREAK GOSUB 

ON BREAK GOSUB <linenumber> 



10 ON BREAK GOSUB 40 

20 PRINT "program running" 

30 GOTO 20 

40 CLS:PRINT "Pressing CESC] "; 

50 PRINT "twice calls GOSUB-routi ne" 

60 FOR t=1 TO 2000:NEXT 

70 RETURN 

run 



COMMAND: Instructs BASIC to jump to the sub-routine specified in the <line 
number> when the [ESC] key is pressed twice. 

Associated keywords: ON BREAK CONT, ON BREAK STOP, RETURN 
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ON BREAK STOP 

ON BREAK STOP 

10 ON BREAK GOSUB 40 

20 PRINT "program running" 

30 GOTO 20 

40 CLS:PRINT "Pressing [ESC] "; 

50 PRINT "twice caLLs GOSUB-rout i ne" 

60 FOR t=1 TO 2000:NEXT 

65 ON BREAK STOP 

70 RETURN 

run 

COMMAND: Disables the ON BREAK CONT and ON BREAK GOSUB 

command, so that future operations of the [ESC] key stop the program. In the above 
example, the ON BREAK GOSUB command will operate once only, as it is then 
disabled by line 6 5 in the ON BREAK sub-routine. 

Associated keywords: ON BREAK CONT, ON BREAK GOSUB 

ON ERROR GOTO 

ON ERROR GOTO <Iinenumber> 

10 ON ERROR GOTO 60 

20 CLS:PRINT "If error is found, "; 

30 PRINT "then List the program" 

40 FOR t=1 TO 4000:NEXT 

50 GOTO 100 

60 PRINT "Error detected in Line"; 

70 PRINT ERL:PRINT:LIST 

run 

COMMAND: Jumps to the specified dine number> when an error is detected in the 
program. 

The form of the command ON ERROR GOTO turns off the error trap, and 
restores normal error processingby BASIC. 

See also the RESUME command. 

Associated keywords: DERR, ERL, ERR, ERROR, RESUME 
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ON <expression> GOSUB 

ON selector- GOSUB tlistof:<linenumber> 



10 PAPER 0:PEN 1:INK 0,1 

20 CLS:PRINT "MENU OF OPTIONS" : PRINT 

30 PRINT "1 - Change border" : PRINT 

40 PRINT "2 - Change pen":PRINT 

50 PRINT "3 - Change mode" : PRINT 

60 INPUT "Enter your se lecti on"; x 

70 ON x GOSUB 90,110,130 

80 GOTO 20 

90 b=b-1:IF b<0 THEN b=26 

100 BORDER b:RETURN 

110 p=p-1:IF p<2 THEN p=26 

120 INK 1,p:RETURN 

130 m=m-1:IF m<0 THEN m=2 

140 MODE m:RETURN 

run 



COMMAND: Selects a sub-routine line to jump to, depending upon the value of the 
<selector> , which should be a positive integer expression in the range to 255. The 
order of the ■ selector* values determines the 'line number* to be selected from the <list 
offline number>s. In the above example, selecting 1 makes BASIC jump to line 90, 
selecting 2 jumps to line 1 1 0,and3jumpstoline 130. 

If the value of the -selector- is zero, or is higher than the amount of <line number* s 
listed in the command, then no sub-routine line will be selected. 

Associated keywords: RETURN 
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ON<expression> GOTO 

ON 'selector- GOTO distof:linenumber> 

10 CLS:PRINT "MENU OF OPTIONS" : PRINT 

20 PRINT "1 - List program" :PRINT 

30 PRINT "2 - Edit and add":PRINT 

40 PRINT "3 - CataLog disc":PRINT 

50 INPUT "Enter your se lee t i on"; n 

60 ON n GOTO 80,90,100 

70 GOTO 10 

80 LIST 

90 AUTO 

100 CAT 

run 

COMMAND: Selects a line to jump to, depending upon the value of the <selector>, 
which should be a positive integer expression in the range to 255. The order of the 
-selector* values determines the dine number- to be selected from the dist. offline 
number >s. In the above example, selecting 1 makes BASIC jump to line 80, selecting 
2 jumps to line 9 , and 3 jumps to line 100. 

If the value of the -selector* is zero, or is higher than the amount of dine numbers 
listed in the command, then no line will be selected. 

Associated keywords: none 

ONSQGOSUB 

ON SQ ('channel.) GOSUB dine number* 

10 ENV 1,15,-1,1 

20 ON SQ C 1 ) GOSUB 60 

30 MODE 0:ORIGIN 0,0,200,440,100,300 

40 FOR x = 1 TO 13: FRAME:HOVE 330, 200, x 

50 FILL x:NEXT:G0T0 40 

60 READ s:IF s=0 THEN RESTORE:GOT0 60 

70 SOUND 1,s,25,15,1 

80 ON SQ(1) GOSUB 60:RETURN 

90 DATA 50,60,90,100,35,200,24,500,0 

run 
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COMMAND: GOes to a BASIC SUB-routine when there is a free slot in the given 
Sound Queue. The <channel> should be an integer expression yielding one of the 
values: 

1: for channel A 
2; for channel B 
4: for channel C 

Further information concerning sound will be found in part 2 of the chapter entitled 
'At your leisure....'. 

Associatedkeywords:RETURN,SOJND,SQ 

OPENIN 

OP EN IN filename- 

10 REM OPEN an INput file from disc 
20 OPENIN "datafi Le":INPUT #9,a,a$ 
30 CLOSEIN:PRINT "The 2 values are:" 
40 PRINT:PRINT a,a$ 
run 

COMMAND: OPENs an I Nput file from disc, for use in the current program. The 
INputfiletoOPENmustbeanASCIIfile. 

The above example will only work after you have created the file shown in the next 
example (under OPENOUT). 

Associated keywords: CLOSEIN,EOF 

OPENOUT 

OPENOUT -filename* 

10 REM OPEN an OUTput file to disc 

20 INPUT "give me a number variable";a 

30 INPUT "give me a string variable";a$ 

40 OPENOUT "datafi Le" 

50 WRITE #9,a,a$ 

60 CL0SE0UT:PRINT "Data saved onto disc" 

run 

COMMAND: OPENsan OUTput file to disc. 

Associated keywords: CLOSEOUT 
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OR 

•argument' OR <argument> 

IF "aLan"<"bob" OR "dog">"cat" THEN PRINT "correct" ELSE PRINT "wrong" 
correct 

IF "bob'^'alan" OR "cat">"dog" THEN PRINT "correct" ELSE PRINT "wrong' 
wrong 

IF "alan"<"bob" OR "ca t">"dog" THEN PRINT "correct" ELSE PRINT "wrong 1 
correct 



PRINT 1 OR 1 

1 
PRINT OR 


PRINT 1 OR 

1 

OPERATOR: Performs bit-wise boolean operation on integers. Result is 1 unless both 
argument bits are 0. 

Further information concerning logic will be found in part 2 of the chapter entitled 
'At your leisure....'. 

Associated keywords: AND,NOT,XOR 

ORIGIN 

R I G I N <x> / <y>[ / <left> , 'right , <top> , <bottom>] 

10 MODE 1 :80RDER 13:TAG 

20 ORIGIN 0,0,100,540,300,100 

30 GRAPHICS PAPER 3:CLG 

40 FOR x=550 TO -310 STEP -10 

50 MOVE x,206 

60 PRINT "This is a graphics window "; 

70 FRAME:NEXT:GOTO 40 

run 

COMMAND: Sets the graphics origin points 0,0 to the position specified by the 
co-ordinates <x> and <y>. 

A graphics window's dimensions may also be set by specifying the last four optional 
parameters. If the co-ordinates specified for the graphics window describe points 
beyond the edge of screen, then the edge of the graphics window is taken as edge of 
screen. 

Associated keywords: C LG 
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f <S^*.a^,J out * £1=00, K. 0£A^/w 



£t*l*** 



OUT ° t *^ 

OUT <port number* , 'integer expression* 
OUT &F8F4,&FF 

COMMAND: Sends the value in the -integer expression' (in the range to 255) OUT 
to the address specified in the <port number*. 

Not a command to be used by the unwary. 

Associated keywords: I N P , W A I T 

PAPER 

P A P E R [# <stream expression* , ]<ink> 



10 MODE 0:PEN 0:INK 0,13 

20 FOR p=1 TO 15 

30 PAPER p:CLS 

40 LOCATE 7,12:PRINT "paper";p 

50 FOR t=1 TO 500:NEXT t,p 

run 



COMMAND: Sets the background ink for characters. When characters are written to 
the text screen, the character cell is filled with the paper <ink> (in the range to 15) 
before the character is written, (unless the transparent mode has been selected). 

If the -stream expression* is omitted, the PAPER ink for stream #0 is assumed by 
default. 

The number of different PAPER inks supported is dependent upon the screen MODE. 
Associated keywords: GRAPHICS PAPER, INK, PEN 
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PEEK 

P E E K ( <address expression* ) 



10 MODE 1:Z0NE 7 

20 WINDOW 1,40,1,2:WINDOW #1,1,40,3,25 

30 PRINT "memory-address" 

40 LOCATE 20,1:PRINT "memory-contents" 

50 FOR n=0 TO 65535 

60 p=PEEKCn) 

70 PRINT #1,n, ,, C&";HEX$(n);")"; 

80 PRINT #1,TAB(20);p,"(&' , ;HEX$(p);") M 

90 NEXT 

run 



FUNCTION: Reports the contents of the memory location specified in the <address 
expression- which should be in the range &0000 to &FFFF (0 to 65535). In all cases 
PEEK will return the value at the RAM address specified (not the ROM), and will be 
in the range &00 to &FF (0 to 255). 

Associated keywords: POKE 



PEN 

P E N[#<stream expression* ,][4nk>]r , <backgroundmode>] 

10 MODE 0:PAPER 0:INK 0,13 

20 FOR p=1 TO 15 

30 PEN p:PRINT SPACE$(47); "pen";p 

40 FOR t=1 TO 500:NEXT t,p:G0T0 20 

run 

COMMAND: Sets the <ink> (in the range to 15) to be used when writing to the given 
screen stream, (stream ft if not specified). The -background mode* parameter can be 
set to transparent (1) or opaque (0). 

Either of the last 2 parameters may be omitted, but not both. If a parameter is 
omitted, that particular setting is not changed. 

Associated keywords: PAPER 
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PI 

PI 

PRINT PI 
3.14159265 

FUNCTION: Returns the value of the ratio between circumference and diameter of a 
circle. 

Associated keywords: D E G , R A D 

PLOT 

P LO T <x co-ordinate* , <y co-ordinate^, r<ink>lf , dnk mode>JJ 

10 MODE 1:B0RDER 0:PAPER 0:PEN 1 

20 INK 0,0:INK 1,26:INK 2,13,26:t)EG 

30 FOR x=1 TO 360:ORIGIN 320,200 

40 DRAW 50*COSCx),50*SINCx) / 1 

50 PLOT 100*COS(x),25*SIN(x):NEXT 

60 ORIGIN 0,0:t=TIME+700:UHILE TIHE<t 

70 PLOT RND*640,RND*400:WEND 

80 PLOT RND*640,RND*400,2 

90 GOTO 90 

run 

COMMAND: Plots a point on the graphics screen, at the absolute position specified in 
the x,y co-ordinates. The <ink> in which to plot the point may be specified (in the range 
0tol5). 

The optional <ink mode> determines how the ink being written interacts with that 
already on the graphics screen. The 4 <inkmode>s are: 

: Normal 

l:XOR (exclusive OR) 

2: AND 

3: OR 

Associated keywords: GRAPHICS PEN,PL0TR 



Complete List of Keywords Chapter 3 Page 57 



PLOTR 

P LO T R <x offset> , <y offset>[ , [<ink>][ , <ink mode*]] 

10 REM use cursor keys to draw Lines 
20 BORDER 0:GRAPHICS PEN 1 
30 MODE 1:PL0T 320,200 



40 I 
50 I 
60 I 
70 I 
80 I 



INKEYC0)=0 THEN PLOTR 0,1 

INKEYC1)=0 THEN PLOTR 1,0 

INKEY(2)=0 THEN PLOTR 0,-1 

INKEYC8)=0 THEN PLOTR -1,0 

INKEY(9>=0 THEN 30:REM copy=cLear 



90 GOTO 40 

run 

COMMAND: Plots a point on the graphics screen at the specified position <x offset* 
and <y offset* , relative to the current graphics cursor position. The <ink> in which to 
plot the point may be specified (in the range to 15). 

The optional <ink mode> determines how the ink being written interacts with that 
already on the graphics screen. The 4 <ink mode>s are: 

: Normal 

l:XOR (exclusive OR) 

2: AND 

3: OR 

Associated keywords: GRAPHICS PEN, PLOT, 

POKE 

P0KE< address expression > , < integer expression* 

10 FOR m=49152 TO 65535 
20 POKE m,100 
30 NEXT 

run 

COMMAND: Writes the value of the integer expression- (in the range to 255) 
directly into the machine memory (RAM) at the specified <address expression*. 

Not a command to be used by the unwary. 
Associated keywords: PEEK 
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POS 

POS ( # <stream expression*) 

10 MODE 1:B0RDER 0:LOCATE 8,2 

20 PRINT "use cursor Left/right keys" 

30 WINDOW 1,40,12,12:CURSOR 1,1 

40 FOR n=1 TO 19:PRINT CKR$(9) ; : NEXT 

50 IF INKEYCDO-1 THEN PRINT CHRSC9); 

60 IF INKEY(8)<>-1 THEN PRINT CHR$(8); 

70 LOCATE #1,2,24 

80 PRINT #1,"text cursor "; 

90 PRINT #1, "horizontal position ="; 

100 PRINT #1,POSC#0):GOTO 50 

run 

FUNCTION: Reports the current horizontal POS ition of the t ext cursor relative to 
the left edge of the text window. The < stream expression- MUST be specified, and does 
NOTdefaultto#0. 

P S C # 8 ) reports the current horizontal carriage position for the printer, where 1 is 
the extreme left hand edge. 

POS (#9) reports the logical position in the disc file stream, i.e. the number of 
printing characters sent to the stream since the last carriage return. 

Associated keywords: VPOS, WINDOW 

PRINT 

P R I N T[# <stream expression* ,l[<list of:<print items*] 

10 a$="small" 

20 b$="this is a larger string" 

30 PRINT a$;a$ 

40 PRINT a$,a$ 

50 PRINT 

60 PRINT b$;b$ 

70 PRINT b$,b$ 

run 

COMMAND: Prints the <listof:<printitem>s to the given stream, (to stream #0 if no 
-stream expression* is specified). 
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Note that when a semicolon ; is used to tell the computer to print the following <print 
item> next to the preceding item, BASIC first checks to see if the following <print 
item> can fit onto the same line. If not, it will be printed on a new line regardless of the 

semicolon. 

Note also that when a comma , is used to tell the computer to print the following 
-print item> in the next print zone, BASIC first checks to see that the preceding item 
has not exceeded the length of the current zone. If it has, the following <print item> is 
printed in a further zone. 



PRINT SPC 
PRINT TAB 

PRINTL#<streamexpression>,]['listof:<printitem>][;] 
[S P C ( 'integer expression* ) ][-list of:<print item>] 

PRINT[#<streamexpression>,J[-listof:<printitem>][;] 
[TAB(<integerexpression>)J[-listof:<prmtitem>] 

10 PRINT "this is spc function" 

20 FOR x=6 TO 15 

30 PRINT SPC(5)"a";SPC(x)"b" 

40 NEXT 

50 PRINT "this is tab function" 

60 FOR x=6 TO 15 

70 PRINT TAB(5)"a";TAB(x)"b" 

80 NEXT 

run 

SPC prints the number of spaces specified in the -integer expression^ and will print 
any following print item> immediately next to the spaces, (assuming that the 
following <print item> will fit onto the line). Hence it is not necessary to terminate 
SPC with a semicolon, — ^Ke- 

T A B prints the number of spaces relative to the left edge of the text window, and will 
print any following -print item- immediately next to the spaces, (assuming that the 
following -print item> will fit onto the line). Hence it is not necessary to terminate 
TAB with a semicolon. If the current position is greater than the required position, 
then a carriage return is executed, followed by spaces to reach the required position 
on the next line. 
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PRINT USING 

PRINT[#<streamexpression>][<listof:<printitem>][;] 
[USING <formattemplate>][<separator><expression>] 

10 FOR x=1 TO 10 

20 n=100000*(RNDT5> 

30 PRINT "goods";USIN6 "########,.##"; n 

40 NEXT 

run 

PRINT USING enables you to specify the print format of the expression returned 
by the PRINT command. This is achieved by specifying a <formattemplate> to which 
the printed result must correspond. The 'separator* is a comma or semicolon. The 
'format template* is a string expression which is constructed using the following 
'format field specifiers': 

Numeric Formats 

Within the number: 

# Each # specifies a digit position. 
Example template: ###### 

Specifies the position of the decimal point. 
Example template: ######.## 

, (Specifies one digit position.) May appear BEFORE the decimal point only. 
Specifies that digits before the decimal point are to be divided into groups of 
three (for thousands), separated by commas. 
Example template: ######, .## 

Around the number: 

£ £ (Specifies two digit positions.) Specifies that a £ sign be printed immediately 
before the first digit or decimal point (after any leading sign). Note that the £ 
will occupy one of the digit positions. 
Example template: ££######, .## 

** (Specifies two digit positions.) Specifies that any leading spaces be replaced by 
asterisks. 
Example template: **######,.## 
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* * £ {Specifies three digit positions.) Acts * * and £ £ options combined, i.e. 

leading * asterisks and £ sign. 
Example template: **£######,.## 

$$ (Specifies two digit positions.) Specifies that a $ sign be printed 

immediately before the first digit or decimal point (after any leading sign). 
Note that the $ will occupy one of the digit positions. 
Example template: $$######,.## 

* * $ (Specifies three digit positions.) Acts as * * and $ $ options combined, i.e. 

leading * asterisks and $ sign. 
Example template: **$###### , .# # 

+ Specifies that + or - is to be printed, as appropriate. If the + appears at the 

beginning of the template, the + sign is printed immediately before the 
the number (and any leading currency sign). If the + appears at the end of 
the template, the sign is printed after the number (and any exponent 
part). 
Example template: +####.#### 

The - sign may only appear at the END of a template. It specifies that - is 

to be printed after any negative number (and exponent part). If the 

number is positive, a space will be printed. A - sign is printed before a 

negative number by default, unless countermanded by the use of this 

template. 

Example template: ####.####- 

t i T T Specifies that the number is to be printed using the exponent option. The 
T t t t in the template should appear AFTER the digit positions, but 
BEFORE any trailing + or - sign. 
Example template: #.####? \ \ | + 



The <format template* for a number may not exceed 20 characters. Numbers are 
rounded to the number of digits printed . 

If the format template is too small for the input expression, for example: 

PRINT USING "####"; 12345678 

the printed result is NOT shortened to fit the template, but is instead printed in its 

entirety, preceded by a % sign, to indicate 'format failure'. 
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String Formats 



10 CLS:a$ = "abcdefghi j kUnopqrst" 

20 PRINT "input expression ";a$ 

30 PRINT:PRINT " ! specifier= "; 

40 PRIM USING "!";a$ 

50 PRINT:PRINT "\spaces\ specifier= 

60 PRINT USING "\ \";a$ 

70 PRINT:PRINT "8 specifier= "; 

80 PRINT USING "&";a$ 

90 GOTO 90 

run 



i 



Specifies that only the first character of the string is to be printed. 
Example template: ! 



\ <spaces> \ 

Specifies that only the first x characters of the string are to be printed, where x 
is equal to the length of the template (including the back-slashes). 
Example template: \ \ 

& Specifies that the entire string is to be printed 'as is', 
Example template: & 



The ^format template> for a string may not exceed 255 characters. 

Both numeric and string < format template >s may be represented by string variables, 
for example: 

10 a$="££######,.##" 

20 b$ = " !" 

30 PRINT USING a$; 12345.6789; 

40 PRINT USING b$;"pence" 

run 

Further information concerning print formatting will be found in part 2 of the 

chapter entitled 'At your leisure....'. 

Associated keywords: SPC.TAB, USING 
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RAD 

RAD 

RAD 

COMMAND: Sets RAD ians mode of calculation. BASIC defaults to radians when the 
computer is switched on or reset, or when the commands NEW, CLEAR, or LOAD, 
RUN, etc, are issued. 

Associated keywords: ATN, COS, DEG, S IN, TAN 

RANDOMIZE 

RANDOMIZE ['numeric expression^ 

RANDOMIZE 123.456 
PRINT RND 
0.258852139 

COMMAND: Randomizes the number 'seed' specified in the mumeric expression^ 
BASIC'S random number generator produces a pseudo-random sequence in which 
each number depends on the previous number, commencing at a given number seed. 
The sequence is always the same. RANDOMIZE sets the new initial value for the 
random number generator either to the specified value, or to a value entered by the 
user if the <numeric expression) is omitted. 

RANDOMIZE TIME produces a sequence that is difficult to repeat. 

Associated keywords: RND 

READ 

READ <list of: <variable> 

10 FOR n=1 TO 8 

20 READ a$,C 

30 PRINT a$;" ";:S0UND 1,c:NEXT 

40 DATA here, 478, are, 426, 8, 379, notes 

50 DATA 358, of, 319, a, 284, musical, 253, scale, 239 

run 

COMMAND: Reads data from DATA statements and assigns it to variables, 
automatically stepping the 'pointer' to the next item in the DATA statement 
afterwards. The RESTORE command can be used to return the pointer to the 
beginning of a DATA statement. 

Further information concerning data will be found in part 2 of the chapter entitled 
'At your leisure....'. 

Associated keywords: DATA, RESTORE 
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RELEASE 

R E L E A S E < sound channels > 

10 SOUND 65,1000,100 

20 PRINT "Press R to release the sound" 

30 IF INKEY(50>=-1 THEN 30 

40 RELEASE 1 

run 

COMMAND: Releases sound channels which are set to a 'hold' state in the SOUND 
command. 

The parameter <sound channels> must yield an integer value in the range 1 to 7, 
which operates as follows: 

1 : Releases channel A 

2 : Releases channel B 

3 : Releases channel A and B 

4 : Releases channel C 

5 : Releases channel A and C 

6 : Releases channel B and C 

7 : Releases channel A and B and C 

Further information concerning sound will be found in part 2 of the chapter entitled 
'At your leisure....'. 

Associated keywords: SOUND 



REM 

REM <restofline> 

10 REM Interga lat i c Hyperspace Mega-Monster 

Invaders Deathchase by AMSOFT 
20 REM Copyright AMSOFT 1985 

COMMAND: Inserts a R E Hark into a program. The <rest of line> is ignored by BASIC, 
and may contain any characters, including colons : which normally separate 
statements. 

A single quote character ' can be used in place of : R E M in all applications EXCEPT 
in D A T A statements, where the ' is treated as part of an unquoted string. 

Associated keywords: none 
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REMAIN 

R E H A I N ( <timer number* ) 

10 AFTER 500,1 GOSUB 40 

20 AFTER 100,2 GOSUB 50 

30 PRINT "program runni ng" : GOTO 30 

40 REM this GOSUB-routi ne will not be called 

as it is disabled in line 80. 
50 PRINT:PRINT "Timer 1 will now be "; 
60 PRINT "disabled by REMAIN." 
70 PRINT "Time-units remaining were:"; 
80 PRINT REHAINd) 
run 

FUNCTION: Returns the R E M A I Ning count from the delay timer specified in <timer 
number* (in the range to 3), and disables it. 

Further information concerning interrupts will be found in part 2 of the chapter 
entitled 'At your leisure....'. 

Associated keywords: AFTER, D I , EI, EVERY 

RENUM 

RENUM[<newlinenumber>][,[<oldlinenumber>][ / <increment>]] 

10 CLS 

20 REM this uill be line 123 
30 REM this wl U be line 124 
40 REM this will be Line 125 
RENUM 123,20,1 
LIST 

COMMAND: R E N U Mbers program lines. 

The parameter <old line number* specifies the current existing line number at which 
renumbering is to commence. If <old line number* is omitted, renumbering will 
commence from the beginning of the program. 

The parameter <new line number* specifies the new starting line number for the 
renumbered lines. If <new line number* is omitted, the renumbered program will 
start at line 1 0. 

The parameter <increment> specifies the numeric step between each of the 
renumbered lines. If -increment* is omitted, the value of the numeric step will be 1 0. 

RENUM takes care of all GOSUB, GOTO and other line calls. However, line number 
references within string expressions, such as those issued in K E Y commands, are not 
altered; neither are line references within REM statements, nor the <line number 
expression* inaCHAINorCHAIN MERGE command. 

Line numbers are valid in the range 1 to 6 5 5 3 5 . 

Associated keywords: DELETE, LIST 
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RESTORE 

RESTORE [<line number.] 

10 READ a$:PRINT a$;" "; 

20 RESTORE 50 

30 FOR t=1 TO 500:NEXT:GOTO 10 

40 DATA restored data can be read again 

50 DATA and agai n 

run 

COMMAND: Restores the position of the 'pointer' back to the beginning of the D A T A 
statement specified in the optional <line number>. Omitting this parameter restores 
the pointer back to the first DATA statement. 

Further information concerning data will be found in part 2 of the chapter entitled 

'Atyour leisure....'. 

Associated keywords :DATA,READ 

RESUME 

RESUME [.line number*] 

10 ON ERROR SOTO 60 

20 FOR x=10 TO STEP-1:PRINT 1/x:NEXT 

30 END 

40 PRINT "go here after error" 

50 END 

60 PRINT "error no. ";ERR; "i n Line";ERL 

70 RESUME 40 

run 

COMMAND: Resumes normal execution of a program after an error has been 
trapped and processed by an ON ERROR GOTO command. If the <line number > to 
R E S U M E at is not specified, the program will re-commence execution from the same 
line in which the error was first trapped. Try removing the line number* parameter 
in the above example, then RUN again. 

70 RESUME 
run 

Associated keywords: DERR.ERL, ERR, ERROR, ON ERROR GOTO, 
RESUME NEXT 
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RESUME NEXT 

RESUHENEXT 

10 ON ERROR GOTO 90 

20 PRINT "press CENTER] each time" 

30 INPUT "1 M ;a 

40 INPUT "2";a 

50 inpot "3";a REM syntax error! 

60 INPUT "4";a 

70 INPUT "5";a 

80 END 

90 PRINT "error no.";ERR;"in Line";ERL 

100 RESUME NEXT 

run 

COMMAND: Resumes normal execution of a program after an error has been 
trapped and processed by an ON ERR0RG0T0 command. 

RESUME NEXT will re-commence execution from the line after, that in which the 
error was first trapped. ~~ 

Associatedkeywords:DERR,ERL, ERR, ERROR, ON ERROR GOTO, RESUME 



RETURN 

RETURN 

10 GOSUB 50:PRINT "after the gosub":END 
50 FOR n=1 TO 20 

60 PRINT "sub-routine" 
70 NEXT:PRINT 
80 RETURN 
run 

COMMAND: Marks the end of a sub-routine. BASIC returns from the sub-routine to 
the statement immediately after the GOSUB command which invoked it. 

Associated keywords: GOSUB 
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RIGHTS 

R I G H T $ ( -string expression' , -required length* ) 

10 MODE 1:a$="CPC664 computer" 
20 FOR n=1 TO 15:L0CATE 41-n,n 
30 PRINT RIGHT$Ca$ / n) 
40 NEXT 
run 

FUNCTION: Returns the number of characters (in the range to 255) specified in the 
-required length* parameter, after extracting them from the RIGHT of the <string 
expression*. If the -string expression* is shorter than the -required length*, the whole 
-string expression* is returned. 

Associated keywords: LEFTS, M I D $ 



RND 

R N D[ ( -numeric expression* ) ] 

10 RANDOMIZE 

20 FOR x=1 TO -1 STEP -1 

30 PRINT "rnd parameter=";x 

40 FOR n=1 TO 6 

50 PRINT RND(x) 

60 NEXT n,x 

run 

FUNCTION: Returns the next RaNDom number in sequence if the -numeric 
expression* has a positive value or is not specified. 

If the -numeric expression* yields a value of zero, RND returns a copy of the last 
random number generated. 

If the -numeric expression* yields a negative value, a new random number sequence 
is started, the first number of which is returned. 

Associated keywords: RANDOMIZE 
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ROUND 

ROUND ( < numeric expression >[, -decimals* j) 

10 FOR n=4 TO -4 STEP-1 

20 PRINT ROUND ( 1234. 5678, n) , 

30 PRINT "with integer expression";n 

40 NEXT 

run 

FUNCTION: Rounds the -numeric expression* to a number of decimal places or 
power often specified in the decimals* parameter. If 'decimals* is less than zero, the 
mumeric expression* is rounded to give an absolute integer with -decimals* number 
of zeros before the decimal point. 

Associated keywords: ABS,CINT,FIX,INT 

RUN 

RUN ^string expression 

RUN "rointime.dem" 

COMMAND: Loads a BASIC or binary program from disc and commences execution. 
Any previously loaded BASIC program is cleared from the memory. 

Protected BASIC programs may be run directly in this manner. 

Associated keywords: LOAD 

RUN 

RUN[<linenumber>] 
RUN 200 

COMMAND: Commences execution of the current BASIC program, from the 
specified -line number* parameter, or from the beginning of the program if the 
parameter is omitted. RUN resets the value of all current program variables to zero or 
null. 

Protected programs may NOT be run in this manner, after loading. 
Associated keywords: C0NT,END,ST0P 
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SAVE 

SAVE 'filename't/'filetype'H, <binary parameters-] 

SAVE "di scf i le.xyz" 
... .saves the file in normal unprotected BASIC mode. 

SAVE "di scf i Le.xyz",? 
. ...saves the file in Protected BASIC mode. 

SAVE "di scf i le.xyz",A 
....saves the file in ASCII mode. 

SAVE "di scf i Le . xy 2" ,6,8000,3000,8001 

....saves the file in Binary mode. In this example, saves the area of the computer's 
memory starting at address 8000; the length of the file being 3000 bytes; the 
optional entry point address being 8001. 

COMMAND: Saves the program currently in the memory to disc. A Binary file is an 
area of memory saved to disc. The Binary parameters are: 

■start address*, <filelength>[,<entrypoint>] 

The screen memory can be saved as a Binary file. This is known as a 'screen dump' 
and can be performed using the command: 

SAVE "screen", B,8C000,&4000 
Then, to load it back onto the screen: 

LOAD "screen" 
Associated keywords: CHAIN, CHAIN MERGE, LOAD, MERGE, RUN 
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SGN 

S G N ( <numeric expression* ) 

10 FOR n = 200 TO -200 STEP-20 

20 PRINT "SGN returns"; 

30 PRINT SGN(n);"for a value of";n 

40 NEXT 

run 

FUNCTION: Determines the SiGN of the -numeric expression*. SGN returns -1 if 
numeric expression) is less than zero, returns if -numeric expression, equals zero, 
and returns 1 if -numeric expression* is greater than zero. 

Associated keywords: A B S 



SIN 

S I N ( -numeric expression. ) 

10 CLS:DEG:ORIGIN 0,200 
20 FOR n=0 TO 720 
30 y=SIN(n) 

40 PLOT n*640/720,198*y:NEXT 

50 GOTO 50 

run 

FUNCTION: Calculates the S I Ne of the <numeric expression.. 

Note that D E G and R A D can be used to force the result of the above calculation to 
degrees or radians respectively. 

Associated keywords: A T N, C S, D E G, R A D, T A N 



L 
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SOUND 

SOUND < channel status- , <tone periods , -duration* [ , < volume* 
[, -volume envelope^ , <tone envelope>f , <noise period>]]lll 

10 FOR z=0 TO 4095 
20 SOUND 1,1,1,12 
30 NEXT 
run 

COMMAND: Programs a sound. The command takes the following parameters: 

Parameter 1: < channel status > 

The -channel status* parameter must yield an integer in the range 1 to 255. The 
parameter is bit significant, with each bit of the binary value of -channel status> 
signifying the following: 

Bit : (decimal 1) send sound to channel A (Least significant bit) 

Bit 1 : (decimal 2) send sound to channel B 

Bit 2 : (decimal 4) send sound to channel C 

Bit 3 : (decimal 8) rendezvous with channel A 

Bit 4 : (decimal 16) rendezvous with channel B 

Bit 5 : (decimal 32) rendezvous with channel C 

Bit 6 : (decimal 64) hold sound channel 

Bit 7 : (decimal 128) flush sound channel (Most significant bit) 

Hence a -channel status> parameter of 6 8 for example, would mean: 

Send to channel C (4) , with a hold state (64) . 

Parameter 2: 'tone period> 

This parameter defines the pitch of the sound, or in other words, 'what note it is' (i.e. 
do re mi fa so, etc). Each note has a set number, and this number is the -tone period*. 
Seethe chapter entitled 'For your reference....'. 

Parameter 3: < duration > 

This parameter sets the length of the sound, in other words, 'how long it lasts'. The 
parameter works in units of 0.01 (one hundredth) of a second, and if you don't specify 
the -duration* , the computer will default to 20 (one fifth of a second). 



Complete List of Keywords Chapter 3 Page 73 



If the <duration> parameter is zero, the sound will last until the end of the specified 
volume envelope. 

If the <duration> parameter is negative, the specified volume envelope is to be 
repeated A B S ( <duration> ) times. 

Parameter 4: <volume> 

This parameter specifies the starting volume of a note. The number is in the range 
to 15. A < volume* figure of is off, while 15 is maximum. If no number is specified, the 
computer will default to 12. 

Parameter 5: <volume envelope> 

To make the volume vary within the duration of the note, you can specify a volume 
envelope using the separate command E N V. You can in fact create up to 15 different 
volume envelopes referenced in the range 1 to 15. The < volume envelope* parameter 
calls up the appropriate volume envelope reference number for use in the SOUND 
command. 

Refer to the description of the E N V command. 

Parameter 6: <tone envelope> 

To make the tone or pitch vary within the duration of the note, you can specify a tone 
envelope using the separate command E N T. You can in fact create up to 15 different 
tone envelopes referenced in the range 1 to 15. The < tone envelope* parameter calls up 
the appropriate tone envelope reference number for use in the SOUND command. If 
you have specified a negative envelope number in the ENT command, use the 
absolute value of that number (i.e. without the negative sign) in this <tone envelope* 
parameter of the SOUND command. 

Refer to the description of the ENT command. 

Parameter 7: <noise> 

A range of white noise is available, which can be switched off or added to the sound by 
varying the <noise> parameter between and 31. 

Further information concerning sound will be found in part 2 of the chapter entitled 
Atyour leisure,...'. 

Associated keywords: E NT, EN V, ON SQGOSUB,RELE AS E,S 9 
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SPACES 

S P A C E $ ( -integer expressions) 

10 RODE 1 

20 PRINT "Put 9 spaces between me"; 

30 PRINT SPACE$C9); 

40 PRINT "and you!" 

run 

FUNCTION: Creates a string of spaces of the given length, (in the range to 255) 
specified in the -integer expressions 

Associated keywords: SPC, STRINGS, TAB 



SPC 

(See PRINT SPC) 

SPEED INK 

SPEED IN.K<periodl>,<period2> 

10 BORDER 7,18 

20 FOR i=30 TO 1 STEP-1 

30 SPEED INK i,i 

40 FOR t=1 TO 700:NEXT t,i 

run 

COMMAND: Sets the rate of alternation between two ink colours specified in an I N K 
or BORDER command, -period 1> specifies the time, in units of 0.02 (fiftieths) second 
for the first colour to be used; <period 2> sets the time for the second colour. 

You must exercise careful judgement to avoid mesmeric effects when selecting 
colours and repeat rates! 

Associated keywords: BORDER, INK 
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SPEEDKEY 

SPEED KEY -start delay>,<repeatperiod> 

10 CLS:FOR k=7 TO 1 STEP-2 

20 PRINT "type your name, then [ENTER]" 

30 SPEED KEY k,k 

40 LINE INPUT a$:NEXT 

50 PRINT "That's a funny name!" 

run 

COMMAND: Sets the rate of keyboard auto repeat. The 'Start delay> parameter 
specifies the time, in units of 0.02 (Fiftieths) second before auto repeat starts. The 
-repeat period' parameter sets the interval between each auto repeat of a key. 

SPEED KEY will operate only on keys which auto repeat by default, or which have 
been set to auto repeat by the KEY D E F command. 

When intending to use small values of -start delay>, it is wise to pre-program one of 
the numeric keys to return the keyboard to its default SPEED KEY setting of 
30,2. This can be achieved by the command: 

KEY 0, "SPEED KEY 30,2"+CHR$ ( 1 3> 

....which will reset SPEED KEY to its default values when the key on the 
numeric keypad is pressed. 

Associated keywords: KEY D E F 



SPEED WRITE 

SPEED WRITE -integer expression* 

SPEED WRITE 1 

COMMAND: Sets the speed at which data is to be saved or written to a cassette unit 
(if connected). The cassette can be written at either 2000 baud (bits per second) if the 
-integer expression- is X, or at the default rate of 1000 baud if the 'integer expression 
is 0. When loading a file from tape, the computer automatically selects the correct 
reading speed as it loads. 

For higher data reliability, it is recommended that you use SPEED WRITE 

(default). 

The SPEED WRITE command has no effect upon disc operation. 
Associated keywords: OPENOUT.SAVE 
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SQ 

SQ(<channel>) 

10 SOUND 65,100,100 
20 PRINT SQ(1) 
run 
67 

FUNCTION: Reports the state of the Sound Queue for the specified <channel> which 
must be an integer expression, yielding one of the values: 

1 : for channel A 
2 : for channel B 
4 : for channel C 

The SQ function returns an bit significant integer, comprising the following bit 
settings; 

Bits 0, 1, and 2 : the number of free entries in the queue 

Bits 3, 4, and 5 : the rendezvous state at the head of this queue 

Bit 6 : the head of the queue is held 

Bit 7 : the channel is currently active 

....where Bit is the least significant bit, and Bit 7 is the most significant bit. 

It can be seen therefore, that if Bit 6 is set, Bit 7 cannot be set, and vice versa. 
Similarly if Bits 3, 4, or 5 are set, Bits 6 and 7 cannot be set. 

Further information concerning sound will be found in part 2 of the chapter entitled 

'At your leisure....'. 

Associated keywords: ONSQGOSUE^SOUND 

SQR 

S Q R ( < numeric expression* ) 

PRINT SQRC9) 
3 

FUNCTION: Returns the S Quare Root of the specified -numeric expression . 

Associated key words: none 
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STEP 

(See FOR) 

STOP 

STOP 

10 FOR n=1 TO 30:PRINT n:NEXT 

20 STOP 

30 FOR n=31 TO 60:PRINT n:NEXT 

run 

cont 

COMMAND: Stops execution of a program, but leaves BASIC in a state where the 
program can be resumed by the CONT command. STOP may be used to interrupt the 
program at a particular point when de-bugging. 

Associated keywords: C N T , E N D 

STR$ 

S T R $ ( mumeric expression* ) 

10 a=8FF :REM 255 hex 

20 b=&X1 111 : REM 15 binary 

30 c$="***" 

40 PRINT c$+STR$(a+b)+c$ 

run 

*** 270*** 

FUNCTION: Converts the -numeric expression' to a decimal S T Ring representa- 
tion. 

Associatedkeywords:BIN$,DEC$,HEX$,VAL 
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STRINGS 

STRING$( <length> , <character specificier> ) 

PRINT STRING$(40/'*") 
**************************************** 

FUNCTION: Returns a string expression consisting of the specified character 
repeated the number of times (in the range to 255) specified in the <length>. Note 
that the above example could be entered as: 

PRINT STRING$(40,42> 
**************************************** 

....where the < character specifier > 4 2 refers to the ASCII value of the character * i.e. 
equivalenttoPRINT STRING$(40,CHR$<42)). 

Associated keywords: SPACES 
SWAP 

(SeeUINDOWSUAP) 

SYMBOL 

SYMBOL character number* , <list of:<row> 

10 MODE 1:SYHB0L AFTER 105 

20 row1=255:REM binary 11111111 

30 rou2=129:REM binary 10000001 

40 row3=189:REM binary 10111101 

50 row4=153:REH binary 10011001 

60 row5=153:REM binary 10011001 

70 row6=189:REM binary 10111101 

80 row7=129:REM binary 10000001 

90 row8=255:REH binary 11111111 

100 PRINT "Line 110 re-defines the Lett^j- i (105). 

Type in some i's and see! Then List the program." 
110 SYMBOL 105,row1,row2,row3,row4 / row5 / row6,row7,row8 
run 

COMMAND: Re-defines the shape of a character on the screen. Each of the 
parameters must yield an integer in the range to 255. "S&w^ 
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SYMBOL AFTER x 

. ...where x is equal to or less than the character number you wish to re-define. 

The command S Y M B L is then issued, followed firstly by the character number x. 

Regardless of whether or not the value of x specifies a character which is directly 
typeable at the keyboard, the re-defined character can be printed on the screen by 
issuing the command: 

PRINT CHRS(x) 

After SYMBOL x, there are up to 8 parameters which specify the 8 individual 
horizontal rows of the character, starting from the top. Each of the parameters can be 
in the range to 255. The binary representation of each of the 8 parameters 
determines the pattern of that particular row in the finished character. 

For example, if the first of the 8 parameters is 1, then the top row of the character has 
a binary representation of 00000001. Where the 1 appears, the section of the 
character is printed in the PEN colour; where a appears, the section of the character 
is not visible because it is printed in the PAPER colour. Therefore the top row of this 
newly defined character has a dot in the top right hand corner. Continuing this 
example, we will specify the other 7 parameters as 3,7,15,31,63,0,0 -the 
binary representation of all 8 parameters then being: 

parameter (row) 1 : 00000001 binary : (decimal 1) 
parameter (row) 2 : 0000001 1 binary : (decimal 3) 
parameter (row) 3 : 000001 11 binary : (decimal 7) 
parameter (row) 4 : 00001111 binary : (decimal 15) 
parameter (row) 5 : 00011111 binary : (decimal 31) 
parameter (row) 6:00111111 binary : (decimal 63) 
parameter (row) 7 : 00000000 binary : (decimal 0) 
parameter (row) 8 : 00000000 binary : (decimal 0) 

Looking at the binary representation of the above 8 parameters, it should be possible 
to see what the shape of the new character is going to be like. Let's assign those 
parameters to character number 255 using the command: 

SYMBOL 255,1,3,7,15,31,63,0,0 



To allocate space in the CPC664's memory for a newly defined character, the 

computer must first be prepared by issuing the command: i 
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Note that the value of appearing in the 2 final parameters means that you need 
only type in: 

SYMBOL 255,1,3,7,15,31,63 

Note that you can enter the parameters in binary to save you converting the 'pattern' 
of the symbol that you've created into decimal form. (Remember to use the & X binary 
prefix.) For example: 

SYMBOL 255,8X0000000 1,&X0000001 1,6X000001 11, 
8X00001111,8X00011111,8X00111111 

....Now, to seethe character: 

PRINT CHR$C255) 

Assigning the above parameters to a typeable character on the keyboard would result 
in the new character appearing whenever the appropriate key is pressed, or wherever 
the previous character would have been printed. Furthermore, BASIC will not reject 
this new character as incomprehensible, but will regard it as the equivalent of the 
previous character. 

Further information concerning user-defined characters will be found in part 2 of the 
chapter entitled 'At your leisure. ...' . 

Associated keywords: HIMEM, MEMORY, SYMBOL AFTER 



SYMBOL AFTER 

SYMBOL A F T E R < integer expression* 

10 CLS 

20 SYMBOL AFTER 115 

30 PRINT "Line 40 re-defines the s "; 

40 SYMBOL 115,0,56,64,64,48,8,8,112 

50 PRINT "to s" 

60 PRINT "Cancel this defintion of s," 

70 PRINT "by typing: SYMBOL AFTER 240" 

run 

COMMAND: Sets the number of permissible user defined characters (in the range 
to 256). The default setting is 240, giving 16 user defined characters (from 240 to 255). 
If the <integer expression- is 3 2 , then all characters from 32 to 255 are re-definable. 
SYMBOL AFTER 256 permits no characters to be re-definable. 

Whenever a SYMBOL AFTER command is executed, all user defined characters 
are reset to their default conditions. 
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SYMBOL AFTER will NOT operate if invoked AFTER the value of H I M E M has 

been altered using the MEMORY command, or by the opening of a file buffer with 
OPENIN or OPENOUT. Under such circumstances, an 'Improper argument' 
error (5) will be reported, (unless the previous state was SYMBOL AFTER 256). 

Further information concerning user-defined characters will be found in part 2 of the 
chapter entitled 'At your leisure....'. 

Associatedkeywords:HIMEM, MEMORY, SYMBOL 



TAB 

(SeePRINTTAB) 






TAG p*wr 6-4 

TAG[#<stream expression*] 

10 INPUT "enter your name";a$: CLS 

20 PRINT "You certainly get around ";a$ 

30 TAG 

40 x=LEN(a$)*17:y=50+RND*300:MOVE -x,y 

50 FOR f=-x TO 640 STEP RND*7+3 

60 MOVE f,y:PRINT " ";a$; : FRAME : NEXT 

70 FOR b=640 TO -x STEP-RND*7+3 

80 MOVE b,y:PRINT a$;" ";: FRAME : NEXT 

90 GOTO 40 

run 

COMMAND: Sends any text specified for the given stream expression* to be printed 
at the graphics cursor position. This allows text and symbols to be mixed with 
graphics, or moved pixel by pixel as opposed to character by character. The <stream 
expression defaults to # if omitted. 

The top left of the character cell is T A Gged ( Text At Graphics) to the graphics cursor, 
and non-printing control characters (e.g. line feed and carriage return) will display if 
the PRINT statement is not terminated by a semicolon. 

In the default stream (#0), BASIC will switch off TAG when returning to direct 
mode. 

Associated keywords: T A G F F 
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TAGOFF 

TAGOF F[#<streamexpression>] 

10 MODE 2:TAG :REH Text At Graphics-on 

20 year=1984:F0R x=1 TO 640 STEP 70 

30 HOVE x,400:DRAWR 0,-350 

40 year=year+1 :PRINT year;:NEXT 

50 TAGOFF :REH Text At Graphics-OFF 

60 LOCATE 34,25:PRINT "Yearly figures" 

70 GOTO 70 

run 

COMMAND: Cancels TAG (Text At Graphics) for the given <stream expression 
(stream #0 if not specified), and re-directs text to the previous text cursor position 
used before TAG was invoked. 

Associated key words: TAG 

TAN 

T A N ( -numeric expression* ) 

PRINT TANC45) 
1.61977519 

FUNCTION: Calculates the T A Ngent of the ^numeric expression), which must be in 
the range -200000 to +200000. 

Note that D EG and RAD can be used to force the result of the above calculation to 
degrees or radians respectively. 

Associated keywords: ATN, COS, DEG, RAD, S IN 
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TEST 

T E S T ( <x co-ordinate* , <y co-ordinate' ) 

10 CLS 

20 PRINT "You are using pen number"; 

30 PRINT TEST(10,386) 

40 PRINT "Try changing PENS and MODEs"; 

50 PRINT " then RUN again." 

run 

FUNCTION: Moves the graphics cursor to the absolute position specified by the <x 
andy co-ordinate>s, and reports the value of the ink at the new location. 

Associated keywords: MOV E, MOV ER, TESTR, XPOS, YPOS 



TESTR 

TESTR (<x offset*, <y offset*) 

10 MODE 0:FOR x=1 TO 15:L0CATE 1,x 

20 PEN x:PRINT STRING$(10,143) ; : NEXT 

30 MOVE 200,400:PEN 1 

40 FOR n=1 TO 23:L0CATE 12, n 

50 PRINT "pen";TESTR(0 / -16):NEXT 

run 

FUNCTION: Moves the graphics cursor by the amount specified in the <x and y 
offset>s relative to its current position, and reports the value of the ink at the new 
location. { 

Associated keywords: MOVE, MOVER, TEST, XPOS, YPOS * 

4 



THEN , 

{See I F) i 

i 
i 
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TIME 

TIME 



10 CLS:REH clock 

20 INPUT "hour";hour 

30 INPUT "minute";«iinute 

40 INPUT "second";second 

50 CLS:datum=INT(TIME/300) 

60 WHILE hour<13 

70 WHILE minute <60 

80 WHILE tick<60 

90 ti ck=( INT (TIME/ 300>-datum)+second 

100 LOCATE 1,1 

110 PRINT USING "## ";hour, minute, tick 

120 WEND 

130 ti ck=0:second=0:minute=minute+1 

140 GOTO 50 

150 WEND 

160 mi nute=0: hour=hour+1 

170 WEND 

180 hour=1 

190 GOTO 60 

run 



FUNCTION: Reports the elapsed time since the computer was last switched-on or 
reset, (excluding periods when reading or writingto disc). 

Each second of real time is equal to the returned value: TIME/300. 

Associated keywords: AFTER, EVERY, WEND, WHILE 



TO 

(See FOR) 
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TROFF 
TRON 

TROFF 
TRON 

10 TROFF:PRINT:PRINT "TRace-OFF" 

20 FOR n=1 TO 8 

30 PRINT "program runni ng" : NEXT 

40 IF f=1 THEN END 

50 TRON:PRINT:PRINT "TRace-ON" 

60 f=1:G0T0 20 

run 

COMMAND: Traces the execution of a program by printing each line number before 
carrying it out. The line number appears inside square brackets C 3 . 

TRON switches T Race ON; TROFF switches T Race OFF. 

The facility is particularly useful for studying the sequence of program line execution 
just before an error occurs. 

Associated keywords: none 

UNT 

U N T ( <address expression ) 

PRINT UNT(&FF66) 
-154 

COMMAND: Returns an integer in the range -32768 to +32767 which is the 
twos-complement equivalent of the unsigned value of the <address expression*. 

Associated keywords: CI NT, FIX, INT, ROUND 

UPPERS 

U P P E R $ ( ^string expression* ) 

10 CLS:a$="my, how you've grown!" 

20 PRINT UPPER$(a$) 

run 

FUNCTION: Returns a new string expression which is a copy of the specified <string 
expression* but in which all alphabetic characters in the range A to Z are converted to 
upper case. The function is useful for processing input which may come in mixed 
upper/lowercase. 

Associated keywords: LOWERS 
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USING 

(SeePRINTUSING) 

VAL 

V A L ( -string expression ) 

10 CLS:PRINT "I know my times tables!" 

20 PRINT:PRINT "Press a key (1 to 9)" 

30 a$=INKEY$:IF a$="" THEN 30 

40 n=VAL(a$):IF n<1 OR n>9 THEN 30 

50 FOR x=1 TO 12 

60 PRINT n;"X";x;"=";n*x 

70 NEXT:GOT0 20 

run 

FUNCTION: Returns the numeric V A Lue, (including any negative sign and decimal 
point) of the first character(s) in the specified <string expression*. 

If the first character is not a number, then is returned. If the first character is a 
negative sign or decimal point followed by non-numeric characters, a 'Type 
mi s ma tch' error (13) will be reported. 

Associated keywords: S T R $ 

VPOS J yos -e-y 

VPOS (#<streamexpression>) 

10 MODE 1:B0RDER 0:LOCATE 8,2 

20 PRINT "use cursor up/down keys" 

30 WINDOW 39,39, 1,25:CURSOR 1,1 

40 LOCATE 1,13 

50 IF INKEY(0)<>-1 THEN PRINT CHRS(II); 

60 IF INKEYC2X>-1 THEN PRINT CHR$(10>; 

70 LOCATE #1,3,24 

80 PRINT #1,"text cursor "; 

90 PRINT #1, "vertical position ="; 

100 PRINT #1,VPOS(#0):GOTO 50 

run 

FUNCTION: Reports the current Vertical PO Sition ofthe text arrsor relative to the 
top of the text window. The stream expression- MUST be specified, and does NOT 

default to #0. 

Associated keywords: POS.WINDOW XPtfS fr*ftcL 
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— \ 

< 

I 

WAIT &FF34,20,25 ( 



WAIT 

WAIT <port number> , <mask>[ , 'inversion.] 



COMMAND: Waits until the specified I/O 'port number* returns a particular value 
in the range to 255. BASIC loops whilst reading the I/O port. The value read is 
exclusive ORed with the 'inversion, and then ANDed with the <mask> until a 
non-zero result occurs, 

BASIC will wait indefinitely until the required condition occurs. 

Not a command to be used by the unwary. 

Associated keywords : I N P , U T 

WEND 

WEND 

WEND 

COMMAND: Marks the end of the body of program which is to be executed within the 
WHILE loop. WEND automatically selects the W H I L E command it is to be associated 

with. 

Associated keywords: TIME, WHILE 

WHILE 

WHILE <logical expression. 

10 CLS:PRINT "Ten second ti mer" : t=TIME 

20 WHILE TIME<t+3000 

30 SOUND 1,0,100,15 

40 WEND:SOUND 129,40,30,15 

run 

COMMAND: Repeatedly executes a body of program while a given condition is true. 
The WHILE command defines the head of the loop, and specifies the condition in the 
'logical expression.. 

Associated keywords: TIME, WEND 
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WIDTH 

WIDTH <integer expression* 

WIDTH 40 

COMMAND: Tells BASIC how many characters per line are to be printed when a 
printer is connected. BASIC will then send the extra carriage return/line feed at the 
appropriate time. 

The computer assumes a default value of 1 3 2 unless a W I D T H command is specified. 

The command WIDTH 255 suppresses the extra carriage return/line feed 
altogether, allowing printing to be 'line wrapped' by the printer. Note that carriage 
return/line feed will still be generated by a P R I N T command that isn't terminated 
by a semicolon or comma. 

Associated keywords: POS 

WINDOW 

WIN D W[#<streamexpression> , ]<left> , <right> , <top> , <bottom> 

10 MODE 0:BORDER 0:REM testcard 

20 INK 0,0:INK 1,25:INK 2,23:INK 3,21 

30 INK 4,17:INK 5,6:INK 6,2:INK 7,26 

40 PAPER 0:CLS 

50 PAPER 1:WIND0W 2,4,1 ,18: CLS 

60 PAPER 2:WIND0W 5,7,1 ,18: CLS 

70 PAPER 3:WIND0W 8,10,1 ,18: CLS 

80 PAPER 4:WIND0W 1 1 ,13,1 ,18: CLS 

90 PAPER 5:WIND0W 14,16,1 ,18: CLS 

100 PAPER 6:WIND0W 17,19,1 ,18: CLS 

110 PAPER 7:WIND0W 2,19,19,25 : CLS 

120 GOTO 120 

run 

COMMAND: Specifies the dimensions of a text stream ( W I N D W) on the screen. The 
values of the parameters <left>,<right>,<top>, and <bottom> should correspond with the 
inclusive screen character locations consistent with the screen M D E in use. 

If the <stream expression is not specified, BASIC defaults to stream # . 

Further information concerning windows will be found in part 2 of the chapter 

entitled 'At your leisure....'. 

Associated keywords: WINDOW SWAP 
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WINDOW SWAP 

WINDOW SWAP <stream expression* , <stream expression' 



10 MODE 1:INK 1,24:INK 2,9:INK 3,6 ( 

20 WINDOW 21,40,13, 25:PAPER 3 

30 WINDOW #1,1,20,1,12:PAPER #1,2 

40 CLS:PRINT " window number 0" 

50 CLS #1:PRINT #1," window number 1" 

60 LOCATE 1,6 

70 PRINT " red window (0)";SPC(2) 

80 LOCATE #1,1,6 

90 PRINT #1," green window CD" 

100 FOR t = 1 TO 1000:NEXT 

110 WINDOW SWAP 0,1:6OTO 60 

run 

COMMAND: Swaps the text window specified in the first <stream expression* with 
that specified in the second <stream expression* . 

Both -stream expression's must be specified, and in this case should NOT be preceded 
by a # stream director. 

The command may be used to re-direct messages produced by BASIC.which are 
normally always sent to stream # . 

Further information concerning windows will be found in part 2 of the chapter 
entitled 'At your leisure....'. 

Associated keywords: WINDOW 

WRITE 

W R I T £ [# <stream expression* , ][<write list>] 

10 REM write variables onto disc 

20 INPUT "give me a number variable";a 

30 INPUT "give me a string variable";a$ 

40 OPENOUT "datafi Le" 

50 WRITE #9,a,a$ 

60 CL0SE0UT:PRINT "Data saved onto disc" 

run 

COMMAND: Writes the values of the items in the <write list> to the stream specified 
in the <stream expression*. Items written will be separated by commas; strings will be 
enclosed by double-quotes. 
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In this example the values of the variables which you input, are written to stream # 9 
(the disc stream), 

(To recall the values of those variables from disc, it would be necessary to use a 
program such as follows:) 

10 REM retrieve variables from disc 
20 OPENIN "datafi Le":INPUT #9,a,a$ 
30 CLOSEIN:PRINT "The 2 values are:" 
40 PRINTrPRINT a,a$ 

run 

Associated keywords: INPUT, LINE INPUT 



XOR 

<argument> XOR <argument> 



IF *'alan"<"bob" XOR "dog">"cat" THEM PRINT "correct" ELSE PRINT "wrong" 
wrong 

IF "bob"<"alan" XOR "cat">"dog" THEN PRINT "correct" ELSE PRINT "wrong" 
wrong 



IF "aLan"<"bob" XOR "cat">"dog" THEN PRINT "correct" ELSE PRINT "wrong" 
correct 



PRINT 1 XOR 1 


PRINT XOR 


PRINT 1 XOR 

1 



OPERATOR: Performs bit- wise boolean operation on integers. Result is 1 unless both 
argument bits are the same - e X elusive R . 

Further information concerning logic will be found in part 2 of the chapter entitled 

'At your leisure....'. 



Associated keywords: AND, OR, NOT 
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XPOS 

XPOS 

10 MODE 1:DRAW 320,200 

20 PRINT "graphics cursor X P0Sition="; 

30 PRINT XPOS 

run 

FUNCTION: Reports the current horizontal (X) P S ition of the graphics cursor. 

Associated keywords: MOVE, HOVER, ORIGIN, YPOS 

YPOS 

YPOS 

10 MODE 1:DRAW 320,200 

20 PRINT "graphics cursor Y P0Sition="; 

30 PRINT YPOS 

run 

FUNCTION: Reports the current vertical ( Y) P S ition of the graphics cursor. 

Associated keywords: HOVE, MOVER, ORIGIN, XPOS 

ZONE 

ZONE -integer expression* 

10 CLS:F0R z=2 TO 20 

20 ZONE z 

30 PRINT "X","X ZONE =";z:NEXT 

run 

COMMAND: Changes the width of the print zone (specified in P R I N T statements by 
using a comma between print items). The default setting of the print zone is 13 
columns, but may be changed as specified in the 'integer expression* in the range 1 to 
255. 

Associated keywords: PRINT 
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Chapter 4 

Using discs and cassettes 



Part 1 : Discs 



Making working discs 

This section discusses how to make discs to use from day to day, 
and introduces some facilities of CP/M and its Utility programs. 

Subjects covered: 

if Making a backup Master System/Utilities disc. 

if Constructing a Working Systems/Utility disc. 

it: Operating with a BASIC only disc. 

* Installing a Turnkey AMSTRAD BASIC application. 

if Installing a Turnkey CP/M application. 



Part 7 of the Foundation course described how to format a blank system disc, which 
you can use for BASIC and games, as well as CP/M. 

Part 10 of the Foundation course showed you how to make exact copies of discs with 
the DISCCOPY or COPYDISC programs. 

This section considers how to make discs with the programs that you want on them. 

Backup Master Disc 

It is most important to make a copy of the Master System/Utility disc provided with 
your computer, and keep the original safe - it will be very costly to replace if damaged! 
Remember that the disc supplied has two sides; the System/Utilities side and the Dr. 
LOGO side. Every disc, in fact, has two sides and you are free to use either side for any / • 
purposes. #.■**■ 

Remember that if you are using a newblank disc to copy onto, the DISCCOPY and 
COPYDISC programs will for mat for you as well as doing the copying. 

k - WS <*■ ''*■*'■ 
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A working SYSTEM/UTILITY disc 

You will find that, as well as making a day-to-day copy of your Master System/Utility 
disc and Dr. LOGO disc, it is most convenient if you make a 'ly^r kpg utility disc' 
containing a few. o f the programs from your Master System/Utility disc, that you use 
the most. This will still leave plenty of room for your programs. Should you require to 
run any other utility programs, then you can always obtain them from your copy of 
the Master System/Utility disc. All the more commonly used programs will however, 
be at your fingertips. 

First use CP/M and the FORMAT program to create a new blank disc. Then use the 
CP/M program FILECOPYto copy each program that you want onto the new disc. 
Experience will tell you which programs you'll want to have handy. In this example 
we have chosen: 

AMSD0S.COM 

FILEC0PY.COM 

DISCC0PY.COM 

Using your copy of the Master System/Utilities disc as the CP/M system disc, select 
CP/M, and at the A> prompt type: 

FILEC0PY FILEC0PY.COM 

....and follow the displayed instructions. (The SOURCE disc is the one initially in the 
drive, and the DESTINATION disc is the new disc that you are creating). When 
copying has finished, copy the other two programs by the commands: 

FILEC0PY AMSDOS.C0M 
FILEC0PY DISCC0PY.COM 

Once you have made one working system/utilities disc with your selection upon it, 
you can prepare the second side of that disc or both sides of other discs simply by using 
the DISCCOPY or C0PYDISC programs. Take note however, of the copying 
restrictions laid down in the End User Licence Agreement, towards the end of this 
manual. 



A BASIC only disc 



Tracks and 1 of a system disc are reserved by CP/M and cannot be used by you. If you 
want to use all the space on the disc for games, programs or data in BASIC, and 
NEVER intend to use CP/M or ANY of the CP/M utilities on that disc, it can be 
formatted without the CP/M system tracks. It is then called a data disc. 
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The disc must be formatted using an option of the format program, by typing in; 
FORMAT D i*".. 

To copy programs onto this type of disc, you must use FILECOPY (loaded from a 
system disc) or LOAD and SAVE them from BASIC. In a two drive system (i.e. if you 
have connected an additional disc drive to the computer), it is possible to use the 
CP/MutilityPIP. 

The programs COPYDISC and DISCCOPY will format the destination disc to the 
same as the source. 



f 



.,/ - , ..■■<"■ ' £..£■>■ 



Turnkey AMSTRAD BASIC discs 

If you buy an application program written in AMSTRAD BASIC for the CPC664, it 
should be ready to operate when you switch on. (The expression 'turnkey' comes from 
the days when all small computers had a key-operated power switch). All you have to 
do is install it on a suitable working disc. 

Turnkey BASIC using disc supplied 

Simply copy the master disc with COPYDISC or DISCCOPY, preserve the master 
disc and use the copy. Follow the instructions provided to run the program. If you 
require any additional programs from your Master System/Utility disc, use 
FI LECOPYto transfer them. 



Turnkey BASIC onto your Working disc 

In this case copy the supplied programs onto your existing disc. 
Type: 

FILECOPY *.* 

....and follow the instructions. In particular answer N to the question: 

Ambiguous file name: Confirm individual, files (Y/N) ? 

The FILECOPY program will inform you of the filenames as they are copied. You 
can then run the new application program from your upgraded working disc. 
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Turnkey CP/M Discs 



The CP/M operating system allows you to load and run an immense library of 
software which has already been written for personal computers that support CP/M. 
The fundamental 'logic' of these programs has already been devised; all that is 
required to use them on your CPC664 is to establish them on a suitable disc, and 
maybe to inform them of the particular method that the CPC664 uses to operate the 
screen. 

A set of programs on one disc designed to fulfil a specific application is called a 
'package'. These packages are normally designed to work on a large range of different 
computers, each of which has its own size of screen and way of moving the cursor 
around. Sometimes the package you buy will have already been 'installed' for the 
AMSTRAD system, or cater for it by offering a menu of alternative installations. In 
these cases, simply follow the instructions provided with the software. If the package 
does not have an AMSTRAD variant built in, then the section ahead entitled 
'Configuring a CP/M Program' indicates the commands that can be sent to the 
CPC664 screen to produce the sorts of effects that packages require. Normally the 
installation, or customisation, procedure will involve typing in the relevant codes 
when requested to. Again, follow the instructions provided with the package. 

The software you have purchased must be on a disc suitable for use in this system. 
Almost every different computer uses a different form of disc. Although many have 
the same size of disc, this does not necessarily mean that there is any compatibility 
between one and another in the information contained on them. Ask your supplier for 
an AMSTRAD 3 inch version. 



Creating a Turnkey CP/M System disc 

It is wise to preserve the original master disc containing the new. software package, 
and transport the programs to another disc. 

Although the instructions below are for the standard system with one disc drive, it is 
generally simpler to follow these instructions even if you have a 2-drive system (by 
ignoring the second drive). 

Firstly format a new system disc. Then copy all the programs from your master 
package disc using FILECOPY from your System/Utility disc. Type: 

FILECOPY *.* 

....and follow the instructions on the screen. In particular answer N to the question: 

Ambiguous filename: Confirm individual files CY/N) ? 
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The F I LE COPY program will inform you ofthe filenames as they are copied. 

When the FILECOPY program has finished, you will have a working copy of the 
turnkey disc. If you require any Utilities, copy them from your System/Utilities disc 
usingFILECOPY. 

Configuring a CP/M Program 

The CPC664 supports a wide range of control codes suitable for customising a 
software package to run with CP/M. Most data-processing and many other packages 
require to be able to print messages at any part ofthe screen, to accept input from any 
part ofthe screen and to generally understand cursor controls. 

If your package has already been customised for the AMSTRAD system, then you 
need not concern yourself further. 

Configuring the Output from the package 

The installation procedure for a package will normally consist of running a special 
program (often called I N S T A L) which will ask a number of questions about the 
parameters of the CPC664 screen. The answers should be derived from the table 
below, which is an extract from the AMSTRAD CPC664 BASIC reference Manual 
SOFT 945: 



Value Hex 


Value Decimal 


Operation 


&07 


7 


Sound Bleep er 


&08 


8 


Move cursor back one position. 


&09 


9 


Move cursor forward one position. 


&0A 


10 


Move cursor down one line. 


&0B 


11 


Move cursor up one line. 


&0C 


12 


Home cursor and clear screen. 


&0D 


13 


Move cursor to left edge of window on 
current line. 


&10 


16 


Delete character at cursor position. 


&11 


17 


Clear from left edge of window to and 
including the cursor position. 


&12 


18 


Clear from and including the current 
cursor position to right edge of window. 


&13 


19 


Clear from start of window to and 
including the current cursor position. 


&14 


20 


Clear from and including the current 
cursor position to end of window. 


&18 


24 


Toggle into/out- of inverse video. 


&1E 


30 


Home cursor. 


&lF-c.<r. 


31-c-r. 


Move cursor to given position in current 
window. <c> is column, normally 1 to 80, 
■ r>isrow, normally 1 to 25. 
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Configuring the Input to the package 

The programs in the package will expect to be able to interrogate the keyboard. Most 
of the keys on the CPC664 keyboard return standard values except for the cursor 
keys. It is possible to use the SETUP utility (see part 2 of the chapter entitled 
'AMSDOS and CP/M' to re-define the codes produced by the keyboard, although 
where possible, it is preferable for each different package to be configured to accept 
the standard default values. 

The column marked 'WP Value' in the table below indicates typical values which 
might be set into the keyboard via the SETUP utility in a word processing 
environment if, for example, cursor codes are required from both the cursor key 
cluster and a portion of the keyboard, and the Word Processing package is only 
capable of recognising one unique code for each operation. 

The installation procedure for a package will normally consist of asking a number of 
questions about the parameters of the CPC664 keyboard. The answers should be 
derived from the table below, which is an extract from the AMSTRAD CPC664 
BASIC reference Manual SOFT 945: 



Key Name 


Value 


Value 


(Key number if required 


WP Value 




(Hex) 


(Decimal) 


to use 


SETUP utility) 


(Decimal) 


Cursor up 


&F0 


240 







5 


Cursor right 


&F3 


243 




1 


4 


Cursor down 


&F1 


241 




2 


24 


Cursor left 


&F2 


242 




8 


19 


Clr 


&10 


16 




16 


7 


Return 


&0D 


13 




18 


13 


Space 


&20 


32 




47 


32 


Escape 


&FC 


252 




66 


27 


Tab 


&09 


9 




68 


9 


Del 


&7F 


127 




79 


127 



Starting a Turnkey CP/M Package 

Normally all that is required, is to type the package's main program name at the A > 
prompt. For example to run a wages program called PAYROLL. COM simply type: 

PAYROLL 
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Autostarting a Turnkey CP/M Package 

It is possible to arrange for the CP/M operating system to automatically run a 
particular program every time CP/M is entered on that particular disc. This is 
performed by one of the options in the SETUP utility program (see part 2 of the 
chapter entitled 'AMSDOS andCP/M' for details). 



Part 2: Cassettes 



If you wish to use a cassette unit connected to the system, (as described in part 2 of the 
Foundation course), a number of the BASIC commands will operate differently when 
the computer is set to cassette operation by the command t T A P E . Various software 
messages and prompts will appear on the screen which are not seen during normal 
disc operation. 

Unlike discs, filenames on cassette do not have such strict rules concerning their 
form. They may be up to 16 characters long, and may contain embedded spaces and 
punctuation marks. In some instances, they may be omitted altogether. 

The following list describes the DIFFERENCES in the operation of each of these 
BASIC commands. Descriptions of the commands themselves will be found in the 
chapter entitled 'Complete listofAMSTRADCPC664 BASIC keywords'. 

CAT 

You will be instructed: 

Press PLAY then any key: 

....whereupon you should press the PLAY button on your cassette unit, followed by 
one of the grey keys on the computer. The tape in the cassette will start turning, and 
the computer will display the names of each of the files that it finds (in sequence) on 
the cassette. 

Each of the blocks of a file will be displayed, followed by a single character which 
indicates what sort of file it is: 

$ is an unprotected BASIC file 

% is a Protected BASIC file 

* is an ASCII file 

& is a Binary file 
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The computer displays: 

Ok 

....at the end of the line if it has read the file successfully, indicating that the file 
would have loaded into memory, had the computer attempted to do so. 

The CAT function will not affect the program currently in the computer's memory. 

If a cassette file has been saved without a specified name, CAT will display it as: 

Unnamed file 

C A T is terminated by pressing [ESC}. 

Read errors 

If the above file-reading messages are not displayed, or you get the message: 

Read error a ....or.... Read error b 
....on the screen, this indicates either of the following: 

1 . Your cassette unit is not correctly connected to the computer's TAPE socket (see 
part 2 of the Foundation course). 

2. The VOLUME or LEVEL control on your cassette unit is not correctly adjusted. 

3. The tape quality is poor, or the tape is worn, 

4. The tape has been subjected to a magnetic field by being placed close to a 
loud-speaker, television set, etc. 

5. You are attempting to read a cassette which has not been created for use on 
AMSTRAD computer systems. Note that you may use all software written for 
the AMSTRAD C PC 664, and most software written for the AMSTRAD 
CPC464. 
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CHAIN 

CHAIN MERGE 
LOAD 
MERGE 
RUN 

You need not specify the filename if you wish the first suitable file on the cassette to 
be loaded. Example commands: 

CHAIN "" 
CHAIN "",100 

CHAIN MERGE "" 

CHAIN MERGE "",100 

CHAIN MERGE "" , 1 00, DELETE 30-70 

LOAD "" 

LOAD ,,,, ,81F40 

MERGE "" 

RUN " " (Note that holding down the [CTRL] key then pressing the small 

[ENTER] key on the numeric keypad, executes this command. Use 
when running cassette based software, after typing I TAPE) 

You will be instructed: 

Press PLAY then any key: 

....whereupon you should press the PLAY button on your cassette unit, followed by 
one of the grey keys on the computer. The tape in the cassette will start turning, and 
the computer will load the file to be processed. 

The screen will display the loading messages: 
Loading FILENAME block 1 

. ...and as many other block numbers as there are in the file, until the file is loaded. 

If the first character of the filename is ! then the above messages will be suppressed, 
and you will not be required to 'press any key' for the file to load. (You must make sure 
that the PLAY button on your cassette unit is down.) If your programs use the ! mark 
and are also required to run on disc, the ! mark will be ignored during disc operation 
(when the disc filename is being read). Note that the ! mark does NOT occupy one of 
the character positions in the cassette or disc filename. 
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I 
I 
i 

I 
\ 

Broken in I 



Abandoning the command using the [ESC] key produces the error message on the 
screen: 



If the file does not successfully load, read the paragraph entitled 'Read errors' earlier 
in this section. 



WARNING: The internal disc interface occupies a small portion of the 
memory that in some cases, was used by commercial writers of cassette based 
software for the model CPC464. These cassettes will not operate properly' with 
the CPC664 + Cassette unit. 



EOF 

POS(#9) 

These functions operate on cassette as per disc. 



INPUT #9 
LINE INPUT #9 
OPENIN and CLOSED* 

You need not specify the filename if you wish the first suitable file on the cassette to 
be loaded. Example command: 

OPENIN "" 

You will be instructed: 

Press PLAY then any key: 

....whereupon you should press the PLAY button on your cassette unit, followed by 
one of the grey keys on the computer. The tape in the cassette will start turning, and 
the computer loads the first 2K bytes of the file into a portion of the memory called the 
Tile buffer'. Input is taken from from the file buffer until it is empty, and the computer 
again prompts: 

Press PLAY then any key: 

. ...and loads the next 2K bytes from the file. 
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The screen will display the loading messages: 

Loading FILENAME block 1 

....andotherblocknumbersinturn, as thefile is loaded. 

If the First character of the filename in the P E N I N command is ! then the above 
messages will be suppressed, and you will not be required to 'press any key' for the file 
to load. (You must make sure that the PLAY button on your cassette unit is down.) If 
yourprogramsusethe ! markandarealsorequiredtorunondisc,the ! mark will be 
ignored during disc operation (when the disc filename is being read). Note that the ! 
mark does NOT occupy one of the character positions in the cassette or disc filename. 

Abandoning File input using the [ESC] key produces the error message on the screen; 
Broken in 

If the file does not successfully load, read the paragraph entitled 'Read errors' earlier 
in this section. 

LIST #9 

OPENOUT and CLOSEOUT 

PRINT #9 

WRITE #9 

You need not specify the Filename if you wish the file to be saved as an Unnamed 
f i Le. Example command: 

OPENOUT "" 

The First 2K bytes of the file to be saved to cassette will first be written into a portion 
of the memory called the 'file buffer'. When the file buffer is full, you will be 
instructed: 

Press REC and PLAY then any key: 

... .whereupon you should press the RECORD and PLAY buttons on your cassette unit, 
followed by one of the grey keys on the computer. The tape in the cassette will start 
turning, and the computer saves the contents of the file buffer. The computer then 
refills the file buffer with the next 2K bytes of the file, and again prompts: 

Press REC and PLAY then any key: 

„,,and saves the next 2K bytes to cassette. 
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If the file buffer is partly full and the command CLOSEOUT is encountered, the 
computer will save the remaining contents of the file buffer to cassette, issuing the 
prompt: 

Press REC and PLAY then any key: 
The screen will display the saving message: 
Saving FILENAME block -x> 

If the first character of the filename in the P E N U T command is ! then the above 
messages will be suppressed, and you will not be required to 'press any key' for the file 
to save. (You must make sure that the RECORD and PLAY buttons on your cassette 
unit are down. ) If your programs use the ! mark and are also required to run on disc, 
the ! mark will be ignored during disc operation (when the disc filename is being 
read). Note that the ! mark does NOT occupy one of the character positions in the 
cassette or disc filename. 

Abandoning file output using the [ESC] key produces the error message on the 
screen: 

Broken in 



Successful saving 

To ensure that the file is successfully saved: 

1. Check that your cassette unit is correctly connected to the computer's TAPE 
socket (see part 2 of the Foundation course). 

2. Check that the RECORD or LEVEL control on your cassette unit is correctly 
adjusted. 

3. Check that you are not using inferior quality cassettes or C120s. (AMSOFT C15 
cassettes are recommended. ) 

4. Make sure that your cassettes are not subjected to magnetic fields by being 
placed close to a loud-speaker, television set, etc. 

5. Before deleting a program from the memory after saving it, C A Talog the tape, 
to verify that the program has been saved successfully. 

6. Ensure that your cassette unit is periodically maintained, and that the tape 
heads are regularly cleaned. 
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SAVE 

You need not specify the filename if you wish the program to be saved as an 
Unnamedfi Le, Example command: 

SAVE"" 

You will be instructed: 

Press REC and PLAY then any key: 

....whereupon you should press the RECORD and PLAY buttons on your cassette unit, 
followed by one of the grey keys on the computer. The tape in the cassette will start 
turning, and the computer will save the program. 

The screen will display the saving messages: 
Saving FILENAME btock 1 

....and as many other block numbers as there are in the file, until the file is saved. 

If the first character of the filename is ! then the above messages will be suppressed, 
and you will not be required to 'press any key' for the file to be saved, (You must make 
sure that the RECORD and PLAY buttons on your cassette unit are down.) If your 
programs use the i mark and are also required to run on disc, the ! mark will be 
ignored during disc operation (when the disc filename is being read). Note that the ! 
mark does NOT occupy one of the character positions in the cassette or disc filename. 

Abandoning the command using the [ESC] key produces the error message on the 
screen; 

Broken in 

Read the paragraph entitled 'Successful saving', earlier in this section. 

SPEED WRITE 

The command operates only on cassette, and can be issued while the computer is set 
to disc operation. 



Error messages 

Note that error messages 7, 21, 24, 25, 27, and 32 (see the chapter entitled 'For your 
reference....') will be generated during cassette operation, if appropriate. 
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AMSDOS external commands 

Input and output direction to cassette or disc, is effected by the commands: 

ITAPE(whichcanbesub-dividedinto I TAPE. IN and IT APE. OUT) 
I DISC (which can be sub-divided into I DISC . IN and i D I S C . OUT) 

All external commands: 

IA 

IB 

ICPH 

IDIR 

(DRIVE 

I ERA 

IREN 

P USER 

Are executed to disc, regardless of whether cassette operation has been selected. 
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Chapter 5 
AMSDOS and CP/M 



Parti: AMSDOS 

Subjects covered: 

* Introduction to AMSDOS 
^ Disc Directory 

it Changing discs 

it The format of file names 

* AMSDOS file headers 
it Wild cards 

it An example program using AMSDOS Commands 

it Reference Guide to AMSDOS Commands 

it Manipulating files 

it Reference guide to Error Messages 

Introduction 

AMSDOS extends the AMSTRAD BASIC supplied with your computer, by the 
addition of a number of external commands, which are identified by the preceding I 
(bar) symbol. 

AMSDOS allows the user to change discs freely, as long as no files are in use - in 
which case an error message will be displayed and there could be a loss of data if the 
open file was being written to. 

Disc Directory 

Every disc has two sections, the directory and the data area. The directory contains a 
list of all the filenames and a 'map' of whereabouts on the disc each file is to be found. 
AMSDOS or CP/M can calculate the size of a particular file by inspecting its directory 
entry. Calculation of the amount of space left on a disc is made by adding up all the 
files in the directory and seeing how much remains unused. 

Whenever a file is read, its directory entry is examined, giving the disc location. 
When a new file is created, free space is allocated to it, and when a file is erased the 
space is relinquished. The directory works in units of IK and can have up to 64 
different entries. Large files will have one entry for every 16K although normally 
this fact is hidden from the user. 
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Changing Discs 

Under AMSDOS a disc may be changed, or removed, whenever the drive is not being 
accessed, and neither the input nor output files are open on that drive. Unlike CP/M 
there is no need to 'log in' a disc. 

Changing a disc while it is still being written to, may corrupt the data on the disc. If a 
disc is changed while there are still files open on it, then as soon as AMSDOS detects 
this, all the open files on the drive will be abandoned and an error message produced. 
Any data yet to be written will be lost and the latest directory entry will not be 
written to disc. However, AMSDOS can only detect this change when it reads the 
directory, which it does every 16K of the file (and whenever a file is opened or closed). 
Thus, potentially 16K of data could be corrupted by changing a disc while there are 
still files open on it. 

AMSDOS filenames and filetypes. 

It is standard practice to name disc files in such a way that there is an indication of 
which 'type' they are. This naming convention DOES NOT 'force' the computer to use 
the file in any particular way, however some programs will only accept a file when it 
has the correct type of name. BASIC will accept any type of name, but will search in 
preference for certain file types if not otherwise specified, (See 'AMSDOS headers' 
ahead.) 

Construction of Filenames 

The filename is constructed from two parts with a . (dot) separating them. The first 
part can be up to 8 characters long, and the second up to 3 characters long. Thus for 
example, "ROI NTIME . DEM" ," FORMAT . COM" ,and "EX1 . BAS" arealllegal 
filenames. 

The second part of the filename is called the filetype. Filenames and filetypes can be 
composed of a mixture of letters and numbers, but cannot have embedded spaces. 
Some common conventional filetypes are: 

.-space- Unspecified type. May be a data file created by an OPENOUT 
"<filename>" or BASIC program saved by AMSDOS using SAVE 
" <filename> " , A style. 

.BAS BASIC program saved by AMSDOS using SAVE ".filename-" or S AVE 
"-filename.", P or S AVE "<filename>. BAS" , A styles. 

.BIN Program or area of memory saved by AMSDOS using SAVE 
" <filename> " / B , .binary parameters> style, 

. BAK Old version of a file, where AMSDOS or a utility program has saved a 
newer version of a file using an existing name. This allows the user to 
back-track to the previous (8 AcK-up) version if required. 

.COM Command file. CP/M utility programs are all of this filetype. 
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AMSDOS headers 

AMSDOS automatically SAVEs files with a suitable type identifier, so it is not 
normally necessary to specify one unless you wish to override the defaults described 
previously. BASIC program files, protected BASIC program files and binary files are 
saved to the disc with a header record, so that the AMSDOS command: 

LOAD "-filename." 

....can recognise them and take the appropriate action. If the AMSDOS command 
LOAD cannot find a header, it assumes that the file is a program in ASCII, i.e. plain 
text. 

Notwithstanding the contents of the header, when AMSDOS is asked to L A D a file 
where no filetype is specified, then it first looks for a file of type: 

. < space' 
If that does not exist, it looks for a file of type: 

. B.AS 
.... then finally, one of type: 

.BIN 

This allows the user to abbreviate the filename, i.e. not needing to specify the 
filetype, in most instances. 

A disc data file started with the command P E N U T and subsequently written to 
will have no header and the contents will be in ASCII, i.e. plain text, from the BASIC 
WRITE, PRINT or LIST commands. The disc command OPEN IN will search for 
files in the same order as L A D , if no file type is specified. 



Filenames on two drives 

On a two drive system, i.e. if an additional FD-1 has been connected to the computer, 
files can exist on either drive. The computer will not automatically look for a file on 
both drives,so the user must specify which drive to use. You can either employ the I A 
or I B or I E> R I V E commands (full description ahead) to select one or other drive, and 
then use a normal filename, or alternatively you can override the default drive 
assignment by specifying the drive as an A : or B : prefix to the filename. Thus, for 
example: 
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IB 

SAVE "PROG.BAS" 
IA 

....and.... 

IA 

SAVE "B:PR0G.BAS" 

... .both save the program on the additional drive, Drive B 

Similarly, you can override the default USER assignment by specifying the USER 
number (in the range to 15) as a prefix to the Filename. Thus, for example: 

LOAD "15:PR0G.BAS" 

....and.... 

SAVE "15:PR0G.BAS" 

....would load and save the program to the USER number 15 section of the disc, 
whatever the default USER number setting. (See the I U S E R command, ahead.) 

Finally, it is possible to override both default USER and DRIVE settings (in that 
order) by specifying them together in the prefix to the filename, for example: 

RUN "15B:PR0G.BAS" 



Wild cards 

It is often required to perform some disc operation (Cataloguing, copying, erasing 
etc, ) on a number of disc files. When a filename is specified for a particular operation, 
the software scans the disc directory looking for a name which exactly matches. It is 
possible, where the command allows, to perform the operation on a set of files where 
some of the characters can be 'don't care'. This is shown by using the character ? in 
the 'don't care' position. If the whole block (or remainder of the whole block) of the 
filename or type specifier is 'don't care', then the block of ? 's can be abbreviated to the 
symbol * . Thus, for example, F R E . * is shorthand for F R E D . ? ? ? and F * . B A S is 
shorthand forF???????.BAS 

Finally, the expression * . * means 'all files'. 
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examples: 



I 7 U3. £ (K - 



DIRECTORY 



Match * . B A S 



Match FRED?. BAS 



Match F*.BA? 



BERT.BAS 
FRE01 .BAS 
FRED2.BAS 
FRED3.BAK 
FRED3.BAS 
FINISH. BAS 



BERT.BAS 
FRED1 .BAS 
FRED2.BAS 

FRED3.BAS 
FINISH. BAS 



FRED1.BAS 
FRED2.BAS 

FRED3.BAS 



FRED1 .BAS 
FRED2.BAS 
FRED3.BAK 
FRED3.BAS 
FINISH. BAS 



Examples of Using Amsdos Commands in a program 

To give you a good understanding of the AMSDOS commands we recommend that 
you work through the examples, referring to the relevant sections in the rest of this 
chapter as you go. DO NOT operate these programs with your original Master CP/M 
System/Utility disc installed - the program writes to the disc and you should NEVER 
risk writing to the master disc. Use a working disc or a copy instead. 

Saving variables and performing a Screen Dump 

Note the use of .DAT and . S R N filetypes. These filetypes are used to remind us of 
what is in the file, rather than because they have any inherent significance. The file 
PARAM.DAT will be an ASCII data file without a header, whilst FLAGDUMP.SRN 
is an AMSDOS Binary file with a header. The programs have been provided on your 
Master System/Utility disc in ASCII form, within the program E X 1 .BAS. 

This example program (EX1 .BAS) draws a Union Jack flag and then saves the 
whole screen to disc. 

Note how the program deliberately tries to read from the file PAR AM . DAT before 
writing to it, in order to establish if the file already exists. If the file does NOT exist, 
then an error is reported by BASIC, the error is trapped by the program, and 
execution proceeds without interruption. If the file DOES already exist, then no error 
is reported, and the program automatically asks if you wish to overwrite the existing 
file. 

To run the program, type: 
RUN "EX1" 
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As we discussed, AMSDOS will search automatically adding the . B A S filetype for 
you. The particulars of the screen dump, namely the screen mode, palette colours and 
name of file containing the actual information are saved into a parameter file. This 
illustrates the use of a data file to WRITE program variables (dumpf i I e$) and 
constants( 1 ),savmgthemforusebyanotherprogram. 



10 dumpf He$ = "flagdump.srn" 

20 MODE 1:B0RDER 

30 DIM coLour(2) 

40 FOR i=0 TO 2 

50 READ coLour(i): REM get colours from DATA statement 

60 INK i ,colour(i ) 

70 NEXT 

80 ON ERROR GOTO 430 

90 OPENIN "param.dat" ' test if file exists 

100 CL0SEIN:0N ERROR GOTO 

110 IF errnutn = 32 AND DERR=146 THEN CLS: 

GOTO 160 ' file doesnt exist 
120 CURSOR 1:PRINT "Do you want to overwrite 

old f i Le? Y/N "; 
130 a$=INKEY$:0N INSTRC" YN" ,UPPER$(a$) ) 

GOTO 130,150, 140:GOTO 130 
140 PRINT a$:PRINT "Program abandoned" : END 
150 PRINT a$:CURS0R 
160 OPENOUT "param.dat" 

170 WRITE #9,dumpf i Le$,1 : REM save filename and mode 
180 FOR i=0 TO 2 

190 WRITE #9,coLour< i } : REM save colours 
200 NEXT i 
210 CLOSEOUT 
220 CLS 

230 gp=1:GRAPHICS PEN gp:w=125 
240 x=-65:a=240:y=400:b=-150:GOSUB 400 
250 y=0:b=150:GOSUB 400 

260 x=575:a=-240:y=400:b=-150:GOSUB 400 
270 y=0:b=150:GOSUB 400 
280 gp=2:GRAPHICS PEN gp:w=40 
290 a=240:x=-40:y=400:b=-150:GOSUB 400 
300 x=0:y=0:b=150:GOSUB 400 
310 a=-240:x=640:y=0:b=150:GOSUB 400 
320 x=600:y=400:b=-150:GOSUB 400 
330 ORIGIN 0,0,256,380,0,400:CLG 1 
340 ORIGIN 0,0,0, 640, 150,250:CLG 1 



Continued on the next page 
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350 ORIGIN 0,0,280,352,0,400:016 2 

360 ORIGIN 0,0, 0,640, 168, 230:CLG 2 

370 SAVE dumpf i le$,b,&C000,&4000 

380 DATA 2,26,6 

390 END 

400 MOVE x,y:DRAUR a,b:DRAWR w,0:DRAWR -a,-b 

410 HOVE x+a/2+w/2,y+b/2:F!LL gp 

420 RETURN 

430 errnum=ERR:RESUME NEXT 

run 

The second example (EX2 . BAS) also provided on your master disc, is a general 
purpose screen dump displaying program, using a parameter file to control its action. 
Note how variables are INPUT from the data file, with the EOF function allowing 
automatic variation in the size of the file. It is important that the screen dump 
displayed by this program was saved with the screen in a known position in memory, 
otherwise the result will be 'skewed'. This is ensured by the saving program 
executing a M D E command and thereafter being careful not to cause the screen to 
scroll. 

10 DIM colour<15): REM Provision for 16 colours 

20 OPENIN "param.dat" 

30 INPUT #9, f i lename$,screenmode 

40 i=0 

50 WHILE NOT EOF 

60 INPUT #9,colour(i) 

70 INK i,colour(i) 

80 i=i+1 

90 WEND 

100 CLOSEIN 

110 MODE screenmode:BORDER 

120 LOAD f i lename$ 

run 



Summary of AMSDOS external commands 

IA 



COMMAND: Set default drive to Drive A. Equivalent to I DRIVE with parameter 
A . (The main drive within the computer is Drive A J 
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IB 

IB 

COMMAND: Set default drive to Drive B. Equivalent to I D R I V E with parameter 
B . (The main drive within the computer is Drive A .) 

ICPM 

ICPM 

COMMAND: Switch to alternative disc environment by loading operating system 
from a system disc. The operating system supplied with the computer is CP/M 2.2 

This will fail if the computer's drive does not contain a system disc with CP/M. 

IDIR 

I 1 R [ / -string expression*] 

IDIR,"*.BAS" 

COMMAND: Display the disc directory (In CP/M style), and free space. If the string 
expression is omitted, the wild-card * . * is assumed. 

I DISC 
I DISC 
COMMAND: Equivalent to the two commands IDISC.INandlDISC.OUT 

I DISC.IN 

I DISC.IN 

COMMAND: Use disc as file input medium, 

I DISC.OUT 

I DISC.OUT 

COMMAND: Use disc as file output medium. 
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I DRIVE 

I DRIVE,<strmg expression 

IDRIVE/'A" 

COMMAND: Set the default drive. This will fail if AMSDOS is unable to read the 
disc in the requested drive. 

I ERA 

I E R A , ^string expression* 

|ERA,"*.BAK" 

COMMAND: Erase all files which match the filename and which are not Read/Only. 
Wild cards are permitted. 

I REN 

I R E N , ^string expression* , -string expression 

IREN/'NEWNAME.BAS'V'OLDNAME.BAS" 

COMMAND: Give a file a new name. A file with the new name must not already 
exist. Wild cards are not permitted. 

The USER (see I USER ahead) parameter may be specified within the -string 
expression's to override any default settings. For example, the command 
|REN,"0:NEW.BAS","15:OLD.BAS" will rename the file in USER 15 
called "0LD.BAS",to a file called "NEW . B AS" in USER 0, regardless of any 
default or previously issued settings of I U S E R . 

I TAPE 

ITAPE 

COMMAND: Equivalent to the two commands ITAPE.IN and ITAPE.OUT. 
Used if an external cassette unit is connected. 
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I TAPE.IN 

ITAPE.IN 

COMMAND: Use tape as file input medium. Used if an external cassette unit is 
connected. 

I TAPE.OUT 

ITAPE.OUT 

COMMAND: Use tape as file output medium. Used if an external cassette unit is 
connected. 

I USER 

I US E R , 'integer expression- 

IUSER,3 

COMMAND: Determines which of up to 16 individual sections of the directory {in the 
range0tol5),discfunctions(e.g. CAT, LOAD, I 01 Retc.)are to be performed on. 

A file on one USER number may be transferred to another, by a I R E N command. For 
example, IREN J ,"15:EXAMPLE.BAS","0:EXAMPLE.BAS" transfers a file 
from USER number to USER number 1 5 , although the name of the file itself 
(EXAMPLE. BAS) is not changed. 



Copying Files 

AMSDOS files with headers 

It is possible to copy this type of file in the CP/M environment using P I P or 
F I L E C P Y (See part 2 of this chapter). Any file created by AMSDOS which has a 
header record (see 'AMSDOS headers', previously described) will be copyable as a 
whole - disc to disc / disc to tape / tape to disc - but in general the contents of the file 
will not be understood by any CP/M programs. 
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ASCII files 

Files created by AMSDOS without headers are generally in ASCII, and are both 
copyable and understood by CP/M programs. In particular it should be possible to 
exchange ASCII program files, ASCII data files and ASCII text files freely between 
AMSDOS and CP/M programs. 



Read/Only files 

It is possible, using CP/M, to set any file to be Read/Only, and/ or invisible to directory 
cataloguing operations. Such attributes can only be set or reset in the CP/M 
environment, but are honoured by AMSDOS. For further details, see part 2 of this 
chapter on CP/M (STAT utility). 



File Copying procedures 

The tables ahead cover copying files of all sorts between disc and tape (if connected). 
It assumes that no additional disc drive is connected. It is not possible to copy a 
protected BASIC program at all, nor to copy a binary file (such as a machine code 
video game) unless the load addresses are known. Further details of the programs 
FILECOPY, CLOAD and CSAVE are given in part 2 of this chapter, which also 
contains information on the CP/M utility PIP. (Copying files from one disc to 
another in a two drive system is normally easier with the PIP utility.) 

See next page for tables . 
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COPY TO: 



AMSTRADBASIC 

on tape * 



COPY FROM: 

ASCIIdata 
on tape* 



Binary 

on tape * 



AMSTRADBASIC 
on tape * 



Binary 
on tape * 



ASCII 
on tape * 



AMSTRADBASIC 
on disc * 



ASCII 
on disc 



Binary 
on disc * 



' File has a header 



ITAPE 

L0AD"FILE" 
■ change tapes> 
SAVE"FILE" 
IDISC 



ITAPE 

LOAD "FILE" 

■change tapes > 

SAVE "FILE", A 

IDISC 



ITAPE 

L0AD"FILE" 
I DISC 
SAVE"FILE" 

ITAPE 

L0AD"FILE" 
IDISC 
SAVE"FILE",A 



H=HIHEH 
ITAPE 

MEM0RY.S.-1 
L0AD"FILE" 
•change tapes > 
SAVE"FILE" ,B, 
.s.,.l.f,<r.l 
IDISC 
MEHORYH 
■note 2. 



ICPH 

CLOAD"FILE",TEMP 

■change tapes' 

CSAVETEMP/'FILE" 

ERATEMP 

AMSDOS 

■ notel' 



ICPH 

CLOAD "FILE" 

AMSDOS 



H=HIMEM 
ITAPE 

MEIfORY-s>-1 
LOAD "FILE" 
I DISC 

SAVE"FILE",B, 
. H .,.l.[,.r.l 
MEMORY H 
•note 2 ■ 



-note 1 > Requires free disc space for temporary file " T E M P " . 

<note 2> <s> is start address of file, «1> is length, <r> is optional run address. 
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COPY TO: 



AMSTRAD BASIC 

on tape * 



Binary 
on tape * 



COPY FROM: 



AMSTRAD BASIC 

on disc * 



ASCII data 
on disc 



AMSDOSBinary 
on disc * 



AH other 
on disc 



ASCII 

on tape * 



AMSTRAD BASIC 

on disc * 



ASCII 
on disc 



AMSDOSBinary 
on disc * 



Ail other 
on disc 



LOAD "FILE" 
ITAPE 

SAVE"FILE" 
I DISC 



H=HIHEH 

HEM0RYs>-1 

L0AD"FILE" 

ITAPE 

SAVE"FILE'.',B, 

.s v .H,.r>| 

1 DISC 

MEHORYH 

■ note 2- 



L0AD"FILE" 

ITAPE 

SAVE"FILE",A 

IDISC 

ICPM 

CSAVE FILE 

AHSDOS 



L0A0"FILE" 
< change discs- 
SAVE"FILE" 
-or- 
ICPM 

FILECOPY FILE 
■follow instructions- 
AHSDOS 



I CPU 

CSAVE FILE 
AHSDOS 



ICPM 

CSAVE FILE 
AMSDOS 
■note 3> 



L0AD"FILE' 
SAVE"FILE' 



,A 



ICPM 

FILECOPY FILE 
•follow instructions- 
AMSDOS 



ICPM 

FILECOPY FILE 
•follow instructions' 
AHSDOS 



ICPM 
FILECOPY FILE 

follow instructions- 
AHSDOS 



* File has a header 

<note2> <s> is start address of file, <1> is length, >r> isoptional run address. 

<note 3 > Destination file cannot be used directly by BASIC. However this option is 

useful as a low cost transportation or backup medium. The file can be copied back 

toadiscbyCLOAD"FILE". 



AMSDOS and CP/M 



Chapter 5 Page 13 



Reference guide to AMSDOS Error Messages 

When AMSDOS cannot carry out a command for some reason, it will display an error 
message. If there is a problem with the hardware, the error message is followed by the 
question: 

Retry, Ignore or Cancel? 

R causes the operation to be repeated, possibly after the user has taken some 
preventative action. 

I causes the computer to continue as if the problem had not occurred, which will often 
lead to unexpected and possibly inconvenient results. 

C causes the operation to be cancelled, which will often lead to a further error 
message. 

For further information see part 6 of the chapter entitled 'For your reference....'. 

y in 
Unknown command t>jv 

....The command is not spelt correctly. 

Bad command 

. . ..The command cannot be carried out for some reason. Syntax error or inappropriate 
hardware configuration. 

.filename- already exists 
.... User is trying to rename a fi le with a name already in use. 

■filename> not found 
....File does not exist. 

Drive .drive': directory fuf.C 
. ...No more room in the disc directory a new entry. 

Drive drive.: disc full 
.... No more room on the disc for new data. 
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Drive «drive>: disc changed, closing -filename- 

....Disc has been changed with files still open on it. 

"filename- is read only 

....File cannot be operated on because it is Read/Only. Files can only be set Read/Only 
or Read/Write in the CP/M environment. 

Drive <drive> : disc missing 

....No disc in drive, or disc is not seated and spinning properly. Recommended action 
is to eject and re-insert the disc and type R 

Drive <drive>: disc is write protected 

....Attempt has been made to write on a disc with the Write Protect hole open. To use 
the disc, eject, close the Write Protect hole, re-insert the disc and type R 

Drive <drive> : read fail 

....Hardware error reading disc. Recommended action is to eject and re-insert the disc 
and type R 

Dri ve <drive>: write fail 

....Hardware error writing disc. Recommended action is to eject and re-insert the disc 
and type R 

Fai Led to Load CP/M 

„..Read error loading CP/M during I C PM command, or you are not using a valid 
system disc containing CP/M. 
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Part 2: CP/M 

Subjects covered: 

it Booting CP/M 
if Configuration sector 
it Direct Console Mode 
it Transient programs 
it Managing peripherals 



CP/M 2.2 is provided with your CPC664. CP/M is a disc operating system. It is a 
special program which gives you access to the full power of your CPC664 system. 
Because CP/M is available for so many different computers it means that there are 
thousands of applications packages available for you to choose from and a whole 
wealth of knowledge and experience for you to draw upon. 

Full details of CP/M including information on how to write your own programs and 
information on the AMSTRAD implementation of CP/M are contained in SOFT159 
-A Guide to CP/M. 



Introduction 

The CP/M operating system provides a user interface for disc hardware - a way for 
you to communicate with the computer and manipulate files and peripherals. 

The fundamental interface that is available is called the Direct Console Mode and is 
identified by the A > or B > prompt. Certain built-in commands are available but the 
majority of the functionality is obtained by loading and running Transient 
Programs'. They are called 'transient' because they are only in the computer (rather 
than on the disc) while you are using them, as opposed to being built-in. 

As well as standard CP/M error messages, the system also generates a number of 
specialised hardware error messages. Refer to the 'Reference guide to AMSDOS error 
messages' in part 1 of this chapter. 



i 
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CP/M system tracks 

The major part of CP/M resides on the outermost two tracks of the disc. The computer 
loads CP/M from these tracks into the memory using a two stage process. 

Firstly the AMSDOS command I C PM loads the first sector of track 0. On a system 
disc this sector has been arranged to be a program which then loads the rest of the 
system tracks into memory. Various checks are performed to determine that the 
system tracks contain valid CP/M software and to calculate where in memory to load 
them. 

Configuration Sector 

During the loading process, when CP/M is first activated, various system parameters 
are loaded from a special sector within the system tracks. These parameters include 
the Sign-On (wake-up) message, special keyboard codes required etc. The SETUP 
utility is provided to customise the configuration sector to your requirements. 

Console control codes 

In the CP/M environment a variety of special key operations are used to control 
program flow. These keystrokes replace the action of the [ESC]ape key used in 
AMSTRAD BASIC, although some applications packages may re-instate the 
[ESC]ape key with some of its former power, 

[CTRL] S . Halts the screen output from CP/M. Type any character to resume. 

[CTRL] C Typed at the start of a line returns control to the Direct Console Mode. 
Many utilities and applications programs will also recognise this as a 
request to abandon the program, 

[CTRL] P Hardcopy toggle. Turn on/off log of all screen output to printer. 

[CTRL]Z End of text. 

Logging in a disc 

Unless special action is taken by the CP/M program (as FILECOPY does for 
example) then CP/M will not allow you to write to a disc unless it has been 'logged in'. 
Furthermore, the type of disc format (SYSTEM, DATA OR IBM) is only 
re-determined when a disc is logged in. For the main disc drive within the computer 
(Drive A) this takes place whenever CP/M returns to the Direct Console Mode, or 
when [CTRL]C is typed at the A> or B> prompt. For an additional drive (Drive B)this 
takes place the first time that the disc in Drive B is accessed, after Drive A has been 
logged in. 
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Should you try writing to a disc that has not been logged in, the error message: 

Bdos Err on <drive- : R/0 

....will be displayed. Press any key to continue. However, if the disc was also of a 
different format, then a read or write error will occur. Type C to continue. 

Direct Console Commands 

There are five Direct Console Commands which can be typed at the A > or B > prompt 
These are S A VE,D I R, ERA, REN, and TYPE. 

The first of these; the SAVE command, is for specialist use only. 

CP/M Error messages tend to be economical and normally consist of repeating the 
offending command or filename followed by a question mark: 

■unknown command* ? 

... .whereupon you should repeat the command with the mistake corrected. 



Filenames 

Many of the commands take filenames as a parameters, and where specified, the 
filename may contain wild-cards (see the section entitled 'Wild cards' in part 1 of this 
chapter). All filenames will be forced to upper case. 

Direct Console Commands and most utility programs do not require that filenames 
are contained in double quotes "".The CLOAD and CSAVE utilities (see ahead) do 
however require that double quotes be placed around the CASSETTE filename. 

Remember that filenames can have an A : or B : prefix to force CP/M to use the 
appropriate drive. 



Switching default drives 

If you have an additional disc drive connected, then it is possible to switch the default 
drive selection between Drive A and Drive B by typing A : or B : at the B > or A > 
prompt. That prompt, of course, tells you the current default drive. Adding the A : 
and B : prefix to filenames overrides, but does not reset, the default drive setting. 
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DIR command 

D I R lists the D I Rectory of the disc. The filenames are not sorted into any particular 
order, but the position of the filename in the DIR display indicates the position of 
that file's entry in the disc directory. Wild cards are permitted. 

DIR will list all files on the default drive 

DIR B: will list all files on Drive B 

DIR * . B A S will list all files of type . B A S 

DIR B:*.BAS will list all files of type . B A S on Drive B 

DIR PIP.COM willlistonly the file PI P . COM (ifitexists) ■ 



ERA command 

E R A is used to E R Ase files from the directory. Only the Directory Entry is erased so 
the data is still in the data section of the disc until the space is re- used by another file, 
but the information is nevertheless not recoverable. Wild card filenames are 
permitted. If the filename * . * is specified then ERA will ask for confirmation that 
all files should be erased. ERA does not list the filenames that are deleted. If any file 
about to be erased is found to be Read/Only (see STAT ahead), then the command will 
abort. 

ERA PIP.COM willerasethefilePIP.COM 

ERA B:PIP.C0M will erase the file PI P . COMonDrive B 

ERA *.BAS will erase all .BAS files 



REN command 

REN allows you to RE Name an existing file. The new filename is specified first, 
followed by = then the existing filename. If the new filename already exists, an error 
message will be displayed. Wild cards are not permitted in the filenames. 

REN NEWNAME.BAS=OLDNAME.BAS willrename the file OLD NAME . BAS 

toNEUNAME.BAS 

REN B:NEWNAME.BAS = OLDNAME.BAS will renamethe file OLD NAME . BAS 

toNEWNAME.BAS.onDriveB. 



TYPE command 

TYPE asks for the specified file to be T Y P Ed onto the screen. If the file is not an 
ASCII text file, unpredictable and possibly undesirable side-effects may occur. 
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TYPE EX1.BAS 
....will display the program file EX 1 . BAS 

Transient commands 

To perform more sophisticated file management than permitted by the Direct 
Console Mode you must employ one of the various utility programs provided. These 
are invoked merely by typing the program name, possibly followed by some 
parameters. You may possibly have already used FORMAT and FILECOPY. ■ 

The commands fall into a number of categories as indicated below. Full 
documentation of these programs is extensive and is contained in SOFT 159 - A Guide 
toCP/M. 

The SYSGEN, BOOTGEN, FILECOPY, COPYDISC, DISCCOPY, CHKDISC, 
DISCCHK, FORMAT, SETUP, CSAVE, CLOAD and AMSDOS commands are 
designed by AMSTRAD, and work exclusively on the AMSTRAD system. They have 
no function on any other CP/M system, although other manufacturers may supply 
similar utilities (often with the same names) customised for their hardware. 



Peripheral Management 



The PIP utility (Peripheral Interchange Program) allows you to transfer 
information between the computer and its peripherals. In general, the form of the 
command is: 

PIP 'destination* = <source> 

The <source> and -destination* can be either a filename, with wild-cards allowed in 
the source, or a device token. The following device tokens may be used: 



As Source 


As destination 


CON: keyboard 

R D R : serial interface 


CON: sereen 

PUN: serial interface 

LST: printer 


Examples: 




PIP B:=A:*.C0M 




....copy all . C OMfilesfrom Drive A to Drive B 
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PIP SAV.BAS=EX1 .BAS 
....makeacopyofEXI . BAS,callingit SAV . BAS 

PIP CON:=EX1.BAS 
....send file EX 1 . BAS to screen. (Similar effect to T YPE EX1 . BAS) 

PIP LST:=EX1 .BAS 
....send file EX 1 .BAS to printer 

PIP fYPEIN.TXT=CON: 

....accept keyboard input into a file called TYPEIN.TXT 

Note that this operation is terminated by the [CTRL]Z control code, and that in order 
to get a new line you must type [CTRL] J after [ENTER] every time. [CTRL] J is the 

ASCII for line feed. 

Note that PIP can NOT be used to copy files from one disc to another on a single drive 
system. Use FI LECOPY instead. 

File and disc copying 

Single file copying 

The utility FILECOPY allows you to copy files from one disc to another, using the 
single drive within the computer. It copes with disc changing and gives full 
instructions on the screen. If a wild-card filename is specified then FILECOPY asks 
you to confirm tht you indeed wish to copy each file on an individual basis. The 
program informs you of each filename as each file is copied. 

FILECOPY *.BAS 
....Copy all the files oftype .BAS 

FILECOPY EX1.BAS 
....Copy the file EX 1 .BAS 
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Whole disc copiers and checkers 

D I S C C P Y (for the standard single drive system) and C P Y D I S C (for two drive 
systems) allow you to make a backup copy of the entire disc. They give full 

instructions on the screen. 

If the destination disc is not formatted, or not of the same format as the source disc 
then these utilities will automatically format the disc correctly as they copy. 

The companion utilities D I S C C H K and C H K D I S C allow you to compare two discs 
and verify that they are have exactly the same contents . 



Cassette Hies 

Two utilities are available which transfer files between disc and cassette. Except for 
specialist use it is unlikely that anything than ASCII, i.e. plain text, files can usefully 
be transferred. 

C L A D can take two parameters, the first is the source (cassette) filename, enclosed 
in double quotes, and the second the destination (disc) filename. If the destination 
filename is omitted, the disc file will have the same name as the cassette file, which 
must then be a CP/M compatible filename. If the source filename is omitted then 
C LOAD reads the first file encountered on the tape. If the first character of the 
cassette filename is ! then the normal cassette messages will be suppressed. 

Example command: 

CLOAD "RY LETTER" MYLETTER.TXT 

C S A V E can take three parameters. The first is the source (disc) filename and the 
second the destination (cassette) filename, enclosed in double quotes. If the 
destination filename is omitted, the cassette file will have the same name as the disc 
file. If the first character of the cassette filename is ! then the normal cassette 
messages will be suppressed. If both filenames are specified, then a third parameter 
may be used to specify the tape write speed; for nominal 1000 baud, 1 for nominal 
2000 baud. 

Example commands: 

CSAVE 0UTPUT.TXT "OUTPUT TEXT" 1 
CSAVE DATAFILE 
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System Management 



STAT 

STAT provides more sophisticated directory (and peripheral) management. All the 
normal rules apply to the filenames, including the use of wild-cards. Facilities 
provided are as follows: 

STAT 

STAT A: 
STAT B: 

....displays disc status and free space. 

STAT *.C0M 
STAT EX1.BAS 

....displays extended directory information about a particular file. 

STAT *.C0H $R/0 
STAT EX1.BAS $R/0 

....sets a file to a Read/Only status, so that it cannot be accidentally erased or 
overwritten. 

STAT *.C0M $R/W 
STAT EX1.BAS $R/W 

. ...sets a file to Read/Write status, reversing the Read/Only assignment. 

STAT *.C0M $SYS 
STAT SECRET. BAS $SYS 

....sets a file to 'System' status so that it is invisible to directory listings and file 
copying programs. The file will still be available for all other purposes. 

STAT *.C0M $DIR 
STAT SECRET. BAS $DIR 

... .sets a file to 'Directory' status, reversing the 'System' assignment. 
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SETUP 

This utility allows you to re-define the characteristics of the CPC664 keyboard and 
disc drive section, and serial interface. It also enables you to invoke various actions 
when CP/M is first loaded. When finished it updates the configuration sector. The 
program is menu-driven and when a particular screen is correct, or requires no 
modification, move on to the next by answering Y to the question: 

Is this correct (Y/N) :„ 

The program can be aborted by [CTRL]C keys. When all the changes have been made 
it will prompt: 

Do you want to update your system disc (Y/N):_ 

....giving you the opportunity to retain the existing configuration sector by typing N. 
It will also prompt: 

Do you want to restart CP/M (Y/N):_ 
. . ..allowing you to load and try the new configuration by typing Y 

To copy a configuration sector from one disc to another, either use BOOTGEN (see 
ahead) or load SETUP from the source disc, answer Y to EVERY question, inserting 
the destination disc before answering the penultimate question. 

Characters with an ASCII value less than decimal 32 can be typed into strings by 
typing a f followed by a suitable character from the set 3, A -Z,[,\,],>, _ 

The following options are those more commonly requiring attention: 

** Initial command buffer: 

Any characters entered here will appear as if they had been typed into the Direct 
Console Mode when CP/M is first loaded. This has the effect of auto-running a 
particular program at that time. Remember to include the equivalent of the {ENTER] 
key which is represented by the two characters f M 

For example to auto-run STAT, the initial command buffer should be S T A T f M 

Sign-on string: 

This is the message displayed at the top of the screen when CP/M is first loaded. Note 
the use of j J f M to give a carriage return - line feed effect. The early part of the 
standard message sets suitable screen and border colours for working in 80 column 
mode, and should be copied exactly if they are to be preserved. 
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Keyboard translations: 

This allows new ASCII values to be set into keys, effectively simulating the KEY D E F 
command in BASIC. The parameters required are the key codes, and the ASCII 
values to set into them. For an illustration of key numbers, refer to the diagram at the 
top right hand side of the computer, or to the chapter entitled 'For your reference....'. 

Keyboard expansions: 

Effectively simulates the KEY command in BASIC, 

AMSDOS 

This program relinquishes control from CP/M and returns to the built-in AMSTRAD 
BASIC, from which the AMSDOS disc commands will be available. 



Disc Generation 

FORMAT 

The computer supports three disc formats, one of which has two variants. 

The usual format is system format, obtained by using the standard FORMAT 
command. The system tracks are read from the disc containing the F0RHAT.COM 
program and are automatically written to the destination disc. 

The other formats are obtained by adding a single letter as a parameter to the 
command, separated by a single space: 

ForDataFormattype: FORMAT D 

For IBM Format type: FORMAT I 

For Vendor Format type: FORMAT V 

WARNING 

The licence agreement for your CP/M (which is electronically serial-number encoded) 
permits its use on a single computer system only. In particular this means that you 
are prohibited from giving any other person a disc with YOUR serial-numbered copy 
of CP/M on it. Because every system disc you make has your CP/M on it, you must be 
careful, therefore, not to sell, exchange or in any other way part with, any system 
format disc. Instead you must format a disc in Vendor format, which is identical to 
system format except that the system tracks are blank, and then copy the relevant 
software onto that disc using F I L E C P Y or P I P. Be careful that the software you 
copy in this way is not itself copyright or subject to a licence agreement. 
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If you receive software on a disc in Vendor format, in order to use it conveniently, you 
may either copy it to a system disc by using FILECOPYorPIP,or alternatively 
convert the disc to a system disc by adding your CP/M to it. This is acheived with the 
BOOTGEN and SYSGEN commands. Carefully read the End User Licence 
Agreement section of this manual. 

NIOVCPM 

Sometimes it is required to construct a version of CP/M which does not load into 
memory at the standard position. This may be because you wish to reserve some 
memory for other purposes. Therefore CP/M itself must be moved to a lower portion of 
memory, and it is possible to locate CP/M at any position in memory on a 256-byte 
boundary. The position is specified by a size parameter in the range 64 to 179. This 
parameter indicates the number of 256-byte areas available for CP/M and transient 
programs. 

The resulting relocated CP/M can either be written to the system disc using SYSGEN 
or saved using a command prompted by the M V C P H program. 

The syntax of the command is M V C P M <size> * 

HOVCPM 178 * 

....will make a CP/M 256 bytes lower in memory than the standard version (which is 
created with the maximum possible size of 179). 

SYSGEN 

SYSGEN writes the result ofaMOVCPM command onto the system tracks of a system 
or Vendor disc. There are three options: 

SYSGEN * 

. ...will write the CP/M generated by an immediately preceding M V C P M command. 

SYSGEN .filename. 

, ...will read in the specified file, which will probably have been saved after a H V C P H 
command, and write that to the system tracks, e.g. SYSGEN CPH44.COM 

SYSGEN 

....(with no parameters) will prompt for a source and destination disc, and therefore 
copies the system tracks from one disc to another. This is the option to use if 
upgrading a Vendor disc to a system disc. 
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BOOTGEN 

B T G E N , which will prompt for source and destination discs, copies Sector 1, track 
(the loader) and the configuration sector from one disc onto another. Use BOOTGEN 
as part of the process of upgrading a Vendor disc to a system disc, or when you want to 
distribute a newly designed configuration sector around a number of discs. 

Advanced programming 

The following programs are available on the disc for specialist use, and it is 
recommended that the user consult SOFT 159 - A Guide to CP/M, or other reference 
works. 

ASM 8080 Assembler. 

DDT 8080 Assembly code debugging aid. 

DUMP Hexadecimal file dump utility. 

ED A simple context editor. 

SUBMIT Console Command Mode batch processing. 

X S U B Transient program batch processing. 
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Chapter 6 
Introduction to LOGO 



This Section is intended to introduce the subject of LOGO, with examples, and 
provide a guide to the commands available. It is not intended to be an exhaustive 
tutorial or reference guide . Such a book is provided by 'A guide to LOGO' (SOFT160) 

Subjects covered are: 

• Concept of LOGO 

• Loading and Running Dr . LOGO 

• Turtle Graphics 

• Writing your own procedures 
ir Editing your own procedures 



What is LOGO? 

LOGO can help you grow as a programmer, whether or not you have ever 
programmed before. 

LOGO is a powerful programming language that is rapidly gaining popularity 
because it is so easy to learn and use. 

You use procedures as building blocks to create LOGO programs. Dr. LOGO itself is a 
collection of procedures, caDed primitives, that you use to build your own programs. 

During the 1970's, a team of computer scientists and educators under the direction of 
Seymour Papert, developed LOGO with turtle graphics to allow very young children 
to program and use a computer. 

They developed the turtle so that young learners could have, as Papert says, 'an 
object to think with', a tool to help them learn in new ways. 

In the form of an arrow head, the turtle can be directed across the screen by the use of 
simple commands. 



Dr. LOGO 

Dr. LOGO is a thoughtful implementation of LOGO which has been specially 
customised for the AMSTRAD personal computer to make it even easier to program. 
Extensions have been included to make available the powerful sound facilities of the 
CPC664 and program editing is made easy by the inclusion of the cursor key cluster. 
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Getting Started 

To operate Dr. LOGO, insert a copy of Side 2 of your master disc into the computer's 
disc drive. (Part 10 of the Foundation Course contains instructions on how to copy the 

master disc.) 

Press the ICTRL][SHIFT] and [ESC] keys simultaneously to reset the computer. 

Type in I CPM [ENTER] and LOGO will load automatically. 

The following Dr. LOGO wake-up message will be displayed on your monitor; 

Welcome to 

Amstrad LOGO V1.1 

Copyright (c) 1983, Digital Research 

Pacific Grove, California 

Dr. Logo is a trademark of 
Digital Resea rch 

Product No. 6002-1232 

Please Wait"'. 



This greeting will soon disappear and a question mark prompt ? will appear on your 

screen. 

The question mark tells you that Dr. LOGO is waiting for you to type something at 

your keyboard. 



First Steps 

Try typing in (using lower case letters): 
fd 60 [ENTER] 

....and you will see a turtle appear which then moves forward 60 units leaving a line 
behind it from where it started, to where it finished. The screen will clear giving a 
large graphics area and a smaller text area with the ? prompt near the bottom of the 
screen. 

Dr. LOGO will often decide to re-arrange the screen so as to give either a large text 
area or large graphics area, for your convenience. 
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Type in: 

rt 90 [ENTER] 

....and the turtle will move 90 degrees to the right. (From now on we will assume that 
you press the [ENTER] key after every line of command.) 

Now type in: 
fd 60 

....and another line will be drawn the same length and at right angles tothe first line. 

Experiment with the simple instructions fd, bk (short for back), rt and Lt (short 
for left) to see what happens on the screen. 

Dr. LOGO Procedures 

A procedure is a list of instructions that tells Dr. LOGO how to do a task. 

You will probably write your first procedures by adding to those already built into Dr. 
LOGO, these are called 'primitives'. 

f d , b k , r t and L t are all built-in primitives which you may use at any time as 
building blocks to write your own procedures. 

Another very useful built-in primitive is c s which clears the screen and sends the 
turtle to its starting position. 



Writing a Simple Procedure 

It is easy to visualise that if the movements: 

fd 60 rt 90 

....were to be repeated 4 times each, a square with sides of 60 units would be drawn. 
The same effect can be achieved by writing a simple formula: 

repeat 4 [fd 60 rt 90] 

Clear the screen and then try typing this in to check what happens. 
To make this formula into a new procedure called ' s q u a r e' type: 

to square 

repeat 4 Cfd 60 rt 90] 

end 
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Dr. LOGO will now understand 'square* and each time it encounters the word 
' s q u a r e ' it will draw a square on the screen. We could have given this procedure 
any name, but we chose ' s q u a r e' to remind us what it does. 

Dr. LOGO allows us to type in a whole set of commands together so the instructions 
square rt 4 5 square, will draw two squares, the second at a 45 degrees 
angle to the first. 



Procedures with parameters 



It is possible to make a procedure to which we can say 'how much', in the same way 
that we can say 'how much' to built-in procedure. To make a procedure that will draw 
squares of different sized sides, the definition of ' s q u a r e' can be altered to: 

to squareanysize : si de 
repeat 4 [fd :side rt 90] 
end 

This new procedure introduces the idea of a 'variable', which in this case is called 
: si de 

You will notice that the variable : s i d e is proceeded by a colon, this indicates to Dr. 
LOGO that : si de is a variable rather than a command. 

When we use procedure squareanysize :side must have a value. Hence an 

instruction squareanysize 150 would produce a square with sides of 150 

units. 

Try adding two procedures together and see what happens. For example from an 

instruction: 

cs squareanysize 100 rt 45 squareanysize 150 

....the turtle will draw two squares of differing sized sides, and one will be at a 45 
degrees angle to the other. 

Notice how Dr. LOGO uses an exclamation mark ! to remind you that a line of 
commands has split across more than one line of screen. 



Using Variables to remember values 

Dr. LOGO will also allow us to use variables to remember values, as well as for 
passing values to a procedure. 
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First define a new procedure called triangle: 

to t ri ang Le 

repeat 3 Cfd :edge rt 120] 

end 

We can test this by typing: 

make "edge 100 
t ri ang Le 

If we want to know the value remembered by : edge we can just type : edge after 
the ? prompt and Dr. LOGO will print the value. 

Finally we can use our variable : e d g e in a new procedure to draw a pattern. Notice 
how the value of : e d g e is increased by adding to its previous value so that each time 
we draw the pattern it gets bigger. 

to pattern 

triangle Lt 60 triangLe rt 60 

make "edge :edge+4 

pattern 

end 

make "edge 10 

cs pat tern 

When you have seen enough, press [ESC] to stop the program. 



Editing programs and procedures 

Dr. LOGO allows us to correct typing mistakes and to alter procedures we have 
defined. The editing keys to use are: 

The cursor keysoo <]l>which move the cursor by one character or line at a time. 

The cursor keys^oi)(i pressed at the same time as holding down [CTRL] will move 
the cursor up and down a page, and to the left and right of a line. 

[CLR] deletes the character under the cursor, [DEL] deletes the character to the left of 
the cursor. 

[ENTER] tells Dr. LOGO that you have finished editing a line of commands or makes 
a new line if you are editing a procedure. 

[ESC] means abandon and [COPY] tells Dr. LOGO that you have finished editing a 
procedure. 
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When typing in commands or new procedures, simply edit the text in front of you on 
the screen. Any characters other than those mentioned above will be inserted into the 
text at the cursor position. 

To edit an existing procedure use the command e d 

Dr. LOGO will display the old version of the procedure on the screen for you and you 
can use all the commands above to move the cursor around and change what it says. 

Try editing the procedure pa t te r n s by typing e d "patterns 

Experiment with the editing keys. If when you have finished if you press [ESC], then 
Dr, LOGO will abandon what is on the screen and give you back the original unedited 

version. 

Type ed "patterns again, and after changing the number 4 to 8, press [COPY] 
to exit, then re-run the procedure and see how the screen output has changed. 
Remember to set the initial value into : e d g e 



Operating hints 

The workspace used by Dr. LOGO is divided into nodes. You can see how many are 

left by typing: 

nodes 

Occasionally, when nearly all the nodes are used up, Dr. LOGO will tidy up the 
workspace and you may see the turtle pause while this happens. You can ask Dr. 
LOGO to tidy the workspace by typing the command: 

recyc Le 

This will often allow you to continue after Dr. LOGO has complained of not having 
any more nodes left. 

Make sure that there is plenty of disc space left before starting Dr, LOGO in case you 
decide to save your procedures on disc. You can use the CAT command in AMSDOS 
(see part 7 of the Foundation course). 

Glance through the final section ahead and try some of the examples - you won't 
understand everything first time! As you learn about Dr. LOGO you will be able to 
use more and more of the commands. 

When you have finished with Dr, LOGO type: 

bye 
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Summary of Dr. LOGO primitives 

This section groups together alphabetical lists of Dr. LOGO primitives showing the 
inputs to use, often with an example. 



WORD AND LIST PROCESSING: 

(Note that prompts ? and > are shown in the following examples) 

ascii 

Outputs the ASCII value of the first character in the input word. 

?ascii "G 

71 

?ascii "g 

103 

bf 

(but first) Outputs all but the first element in the input object. 

?bf "smi tes 

mi Les 

?bf CI 2 33 

C2 3] 

bl 

(but last) Outputs all but the last element in the input object. 

?bl "smi Les 
smi Le 

?bt [12 3 4] 
[1 2 3] 

char 

Outputs the character whose ASCII value is the input number. 

?char 83 
S 
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count 

Outputs the number of elements in the input object. 

?count "six 

3 

?count [0 1 2 33 

4 

emptyp 

Outputs TRUE if the input object is an empty word or an empty list, otherwise 
outputs FALSE. 

?emptyp " 
TRUE 

?emptyp CD 
TRUE 

?emptyp Cx] 
FALSE 

?make "x Zl 
?emptyp :x 
TRUE 

first 

Outputs the first element of the input object. 

?f i rst "zebra 

z 

?f irst M 2 3] 

1 

fput 

(firstput) Outputs a new object formed by making the first input object the first 
element in the second object. 

?fput "s "mi Les 
smi tes 

?fput 1 C2 33 
CI 2 3D 
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item 

Outputs the specified element of the input object. 

?item 4 "dwarf 
r 

list 

Outputs a list made up of the input objects, retains list's outer brackets (compare with 
se). 

?(List 1 2 3 4) 

CI 2 3 4] 

? List "big [feet] 

Cbig [feet]] 

?(List) 

C] 

se 

(sentence) Outputs a list made up of the input objects, removes list's outer brackets 

(compare with List). 

?make "inst r_L i st rl 

repeat 4 Cfd 50 rt 90] 

?run (se "cs :instr_list "ht) 

Note that the underline character between i n s t r and List is obtained by 
pressing [SHIFT]0 

word 

Outputs a word made up of the input words. 

?word "sun "shine 
sunsh i ne 

wordp 

Outputs TRUE if the input object is a word or a number. 

?wordp "hetLo 
TRUE 

?wordp [D 
FALSE 
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Arithmetic Operations: 

cos 

Outputs the cosine of the input number of degrees. 

?cos 60 
0.500000000017049 

int 

Outputs the integer portion of the input number. 

?int 4/3 
1 

random 

Outputs a random non-negative integer less than the input number. 
?random 20 

sin 

Outputs the sine of the input number of degrees. 

?sin 30 
0.500000000017049 

+ 

Outputs the sum of the input numbers. 

?+ 2 2 
4 

?2 + 2 
4 
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Outputs the difference of the two input numbers. 

?- 10 5 
5 

?10-5 
5 



Outputs the product of input numbers. 

?* 4 6 
24 

?4*6 
24 

/ 

Outputs the quotient of the two input numbers. 

?/ 25 5 
5 

?25/5 
5 

Logical Operations: 

and 

Outputs TRUE if the result of all input expressions are true. 

?and (3<4) (7>4) 
TRUE 

not 

Outputs TRUE if the input expression is false. 
Outputs FALSE if the input expression is true. 

?not (3=4) 

TRUE 

?not (3=3) 

FALSE 
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or 

Outputs FALSE if all input expressions are false. 

?or "TRUE "FALSE 

TRUE 

?or (3=4) (1=2) 

FALSE 



Outputs TRUE if the two input objects are equal; otherwise outputs false. 

?= "LOGO "LOGO 
TRUE 

?1=2 
FALSE 



Outputs TRUE if the first input word is greater than the second; otherwise outputs 
false. 

?> 19 20 

FALSE 

?20>19 

TRUE 



Outputs TRUE if the first word is less than the second; otherwise outputs false. 



?< 27 13 
FALSE 
?13<27 
TRUE 
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Variables: 

local 

Makes the input-named variable(s) accessible only to the current procedure and the 
procedures it calls. 

Xlocal "x "y "2) 

make 

Makes the input- named variable the value of the input object. 

?make "side 50 
?:side 

50 



Procedures: 

end 

Indicates the end of a procedure definition; must stand alone at the beginning of the 

last line. 

?to square 

>repeat 4 Cfd 50 rt 90] 

>end 

squa re def i ned 

?square 

po 

(print out) Displays the defmition(s) of the specified procedure(s) or variable(s). 

?po "square 

to square 

repeat 4 Cfd 50 rt 903 

end 
?po "x 

x i s 3 
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pots 

(print out titles) Displays the names and titles of all procedures in the workspace. 

?pots 

to 

Indicates the beginning of a procedure definition. 

?to square 

>repeat 4 Cfd 50 rt 90] 

>end 

squa re def i ned 



Editing: 



ed 

(edit) Loads the specified procedure(s) and/or variable(s) into the screen editor's 
buffer. 

?ed "square 



Text Screen: 

ct 

(clear text) Erases all text in the window that currently contains the cursor, then 
positions the cursor in the upper-left corner of the window. 

?ct 



(print) Displays the input object(s) on the text screen, removes list's outer brackets, 
follows last input with a carriage return (compare with show and type). 

?pr Ca b c] 
a b c 
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setsplit 

Sets the number of lines in the split screen. 
7setspt.it 10 

show 

Displays the input object on the text screen, retains list's outer brackets, follows 
input with a carriage return (compare with p r and type). 

?show Ca b cD 

[a b c] 

ts 

(text screen) Selects a full text screen. 
?ts 

type 

Displays the input object(s) on the text screen, removes list's outer brackets, does not 
follow last input with a carriage return (compare with p r and show). 

?type Ca b c] 
a b c 

Graphic Screen: 

Note that the screen is in Mode 1 , giving four colours, and that the same co-ordinate 
system is used as in AMSTRAD BASIC. In other words all screen positions will be 
rounded to the nearest even-numbered screen dot. Red green and blue colours can 
have amounts of 0,1, or 2. 

clean 

Erases the graphic screen without affecting the turtle. 

?fd 50 
?c Lean 
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cs 



(clear screen) Erases the graphic screen and puts the turtle at [0,0] heading (north) 
with the pen down. 

7rt 90 fd 50 
?cs 

dot 

Plots a dot at the position specified by the input co-ordinate list in the current pen 
colour. 

?dot C50 10D 

fence 

Establishes a boundary that limits the turtle to the visible graphics screen, window 
removes the boundary, 

?fence 

?fd 300 

Turtle out of bounds 

fs 

(full screen) Selects a full graphic screen. 
?fs 

pal 

(palette) Outputs numbers representing the amount of red, green, and blue colour 
assigned to a pen. 

?pat 2 
C0 2 23 

setpal 

(set palette) Sets the pen colour palette. Assign an amount of red, green, and blue to a 
pen. 

?setpaL 3 C1 1 2] 
?paL 3 
CI 1 2: 
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sf 

(screen facts) Outputs information about the graphic screen. The format is: 
[<bgcolour> < screen-state* <split-size> <window-state> <scrunch>] where <bgcolour> is 
the background pen number, always 0. <screen-state> indicates S S (split screen), F S 
(full screen) or T S (text screen). <split-size> is the number of text lines displayed on 
the split screen's text window, and < window-state- indicates WINDOW, WRAP, or 
FENCE mode. scrunch > is permanently set to 1. 

?sf 

[0 SS 5 FENCE 1] 



ss 

(split screen) Displays a window of text on the graphic screen. 

?ss 

window 

Allows the turtle to plot outside the visible graphic screen after a wrap or fence 
expression. 

?fence fd 300 
Turtle out of bounds 
?wi ndou 
?fd 300 

wrap 

Makes the turtle reappear on the opposite side of the graphic screen when it exceeds 

the boundary. 

?cs wrap 
?rt 5 fd 1000 
?cs window 
?rt 5 fd 11 
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Turtle Graphics: 



bk 

(back) Moves the turtle the input number of steps in the opposite direction of its 
heading. 

?cs fd 150 
?bk 50 



fd 

(forward) Moves the turtle the input number of steps in the direction of its current 
heading. 

?fd 80 

ht 

(hide turtle) Makes the turtle invisible; speeds and clarifies drawing. 

?ht 

?cs fd 50 

?st 

It 

(left) Rotates the turtle the input number of degrees to the left. 
?Lt 90 

Pd 

(pen down) Puts the turtle's pen down; the turtle resumes drawing. 

?fd 20 pu fd 20 

?pd 

?fd 20 
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pe 

(pen erase) Changes the turtle's pen colour to 0, the background colour; the turtle 
erases drawn lines. 

?fd 50 
?pe 

?bk 25 

?fd 50 

?pd fd 25 

pu 

(pen up) Picks the turtle's pen up; the turtle stops drawing. 

?fd 30 
?pu 

?fd 30 

?pd fd 30 

px 

(pen exchange) Makes the turtle exchange the colour of any previously coloured pixel 
in its trail with the reverse or logical colour compliment. 

?fd 20 pu fd 20 

?pd setpc 3 fd 20 

?px 

?bk 80 

?fd 80 

?pd bk 100 

rt 

Rotates the turtle the input number of degrees to the right. 
?rt 90 

seth 

(set heading) Turns the turtle to the absolute heading specified by the input number 
of degrees; positive numbers turn the turtle clockwise; negative numbers turn the 

turtle counter-clockwise. 

?seth 90 
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setpc 

(set pen colour) Sets the turtle's pen to that specified by the input number. (0 is the 
background colour.) 

?setpc 1 

setpos 

(set position) Moves the turtle to the position specified in the input co-ordinate list. 
?setpos [3020] 

St 

(show turtle) Makes the turtle visible if hidden. 

?ht 

?fd 50 
?st 

tf 

(turtle facts) Outputs information about the turtle. The format is: [<xeor> <ycor> 
<heading> <penstate> <pencolourn> <shownp>Jwhere <xcor> is the turtle's x co-ordinate. 
<ycor> is the turtle's y co-ordinate. <heading> indicates the compass direction the 
turtle is facing. <shownp> is T R U E if the turtle is visible. <penstate> indicates P D (pen 
down), P E (pen erase), P X (pen exchange) or P U (pen up). <pencolour n> identifies the 
pen's number. 

?setpos [15 30] 

?rt 60 

?setpc 3 

?pe 

?ht 

?tf 

[15 30 60 PE 3 FALSE] 
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Workspace Management: 

er 

(erase) Erases the specified procedure(s) from the workspace. 
?er "square 

ern 

(erase name) Erases the specified variable(s) from the workspace. 

?make "side [100] 

?make "angle C45] 

? : s i de : ang Le 

[100] 

[45] 

?ern [side ang Le] 

?:side 

side has no va Lue 

nodes 

Outputs the number of free nodes in the workspace. 

?nodes 

recycle 

Frees as many nodes as possible and reorganises the workspace. 

?recyc Le 
?nodes 

Property Lists: 

glist 

(get list) Outputs a list of all the objects in the workspace that have the input 
property name in their property lists, 

?gUst "-DEF 
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gprop 

{get property) Outputs the property value of the input property name of the 
input-named object. 

?make "height "72 
?gprop "height ".APV 
72 

plist 

(property list) Outputs the property list of the input-named object. 

?pli st "height 
[.APV 72D 

pprop 

{put property) Puts the input property pair into the input-named object's property 

list. 

?pprop "master ".APV "Scott 

?: master 
Scott 



remprop 

{remove property) Removes the specified property from the input-named object's 
property list. 

?remprop "master ".APV 

Disc Files: 

dir 

(directory) Outputs a list of Dr. LOGO file names on the default or specified disc; 

accepts wild-cards. 

?dir "a:???????? 

(Study part 1 of the chapter entitled 'AMSDOS and CP/M' for the use of ??????? ? 
wild-card characters. Note that the * wild-card is not supported in Dr. LOGO.) 
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load 

Reads the input-named file from the disc into the workspace. 

?load "myf i Le 
? Load "b : shapes 

save 

Writes the contents of the workspace to the input- named disc file. 
?save "shapes 

Keyboard and Joystick: 

buttonp 

(button pressed) Outputs TRUE if the button on the specified joystick is down; 

numbers or 1 identify the two possible joysticks. 

?to f i re 

>labet "Loop 

>if (buttonp 0) Cpr [fire 0!]] 

>if (buttonp 1) [pr Cfire 1!]] 

>go "Loop 

>end 

The position of the joystick is tested by p a d d I e . 

keyp 

Outputs TRUE if a character has been typed at the keyboard and is waiting to be 
read, 

?to inkey 

>if keyp Cop re] Cop "] 

>end 
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paddle 

Returns the state of either joystick or 1. The positions of the joystick are indicated as 
follows: 



Value returned 


Meaning 


255 



1 

2 

3 

4 


Nothing pressed 

Up 

Up and right 

Right 

Down and right 

Down 


5 


Down and left 


6 


Left 


7 


Up and left 


?paddle 




255 





The fire buttons are tested bybuttonp. 

rc 

(read character) Outputs the first character typed at the keyboard, 

?ma ke "key rc 

... .then press X key . . . . 

? : key 
X 



rl 

(read list) Outputs a list that contains a line typed at the keyboard; input must be 
followed by a carriage return. 

?make "i nst r_Li st r L 
repeat 4 [fd 50 rt 90] 
? : i nst r_L i st 
[repeat 4 Cfd 50 rt 90]] 
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rq 

(read quote) Outputs a word that contains a line typed at the keyboard; input must be 
followed by a carriage return. 

?make "command rq 
repeat 3 tfd 60 rt 120] 
? : command 
repeat 3 Cfd 60 rt 120] 



SOUND: 

The sound commands are unique to the AMSTRAD implementation of Dr. LOGO and 
are similar to their AMSTRAD BASIC counterparts. 

Refer to part 9 of the Foundation course for further information. 

sound 

Put a sound into the sound queue. The format is: [^channel status* <tone period* 
'duration* -volume* < volume envelope* < tone envelope* -noise* I The parameters after 
duration are optional. 

?sound [1 20 50] 

env 

Set up a volume envelope. The format is: ['envelope number* -envelope section(s)> J 

?env C1 100 2 20] 
?sound CI 200 300 5 1] 

ent 

Setup a tone envelope. The format is: [-envelope number* -envelope section(s)*] 

?ent [1 100 2 20] 
?sound CI 200 300 5 1 1] 

release 

Releases sound channels that have been set to a hold state in a sound command. The 
channels to release are indicated as follows: 
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Input value Channels released. 






None 


1 


A 


2 


B 


3 


AandB 


4 


C 


5 


AandC 


6 


BandC 


7 


A and B and C 




?reLease 1 



Flow of Control: 

bye 

Exits the current session of Dr. LOGO. 
?bye 

CO 

Ends a pause caused by ICTRL]Z, pause or ERRACT 



CO 



go 

Executes the line within the current procedure following a label expression with the 
same input word. 

>go "Coop 

if 

Executes one of two instruction lists depending on the value of the input expression; 
input instructions must be literal lists enclosed in brackets. 

>if (a>b) [pr Ca is bigger^] 
>Cpr Cb is bi gger] ] 
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label 

Identifies the line to be executed after a go expression with the input word. 
>LabeL "Loop 

op 

(output) Makes the input object the output of the procedure and exits the procedure 
at that point. 

?op _ resu It] 

repeat 

Executes the input instruction list the input number of times. 
?repeat 4 Cfd 50 rt 90] 

run 

Executes the input instruction list. 

?make "instr._l.ist [fd 40 rt 90] 
? run : i nst r_li st 

stop 

Stops the execution of the current procedure and returns to TOPLEVEL (the ? 
prompt) or the calling procedure. 

?stop 

wait 

Stops procedure execution for the amount of time specified by the input number. 
The amount of time = input number * . 22 seconds. 

?wait 20 
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Exception Handling: 



catch 

Traps errors and special conditions that occur during the execution of the input 
instruction list. 

>catch "error [+ C] []] 
>pr CI am here] 
I am here 



error 

Outputs a list whose elements describe the most recent error, 

>catch "error [do . unt i L ■ error] 
>s how error 

pause 

Suspends the execution of the current procedure to allow interaction with the 
interpreter or editor. 

>i f : s i ze>5 [pause] 

throw 

Executes the line identified by the input name in a previous catch expression. 
?throw "TOPLEVEL 



System Primitives: 

.contents 

Displays the contents of Dr. LOGO symbol space. 
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.deposit 

Puts second input number into the absolute memory location specified by the first 
input number. 

.examine 

Displays the contents of the absolute memory location specified. 

System Variables: 

ERRACT 

* 

When TRUE, causes a pause when an error occurs, then returns toTOPLEVEL, 

FALSE 

System value. 

REDEFP 

When TRUE allows redefinition of primitives. 

TOPLEVEL 

throw "TOPLEVEL will exit all pending procedures. 

TRUE 

System value. 

System Properties: 

.APV 

Associated property value; the value of a global variable. 
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.DEF 

Definition of a procedure. 

.PRM 

Identifies a primitive. 
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Chapter 7 

For your reference.... 



This chapter provides much of the reference information that you 
are likely to require as you learn to use this computer. 



Subjects covered: 



* 


Cursor locations and control code extensions 


* 


Interrupts 


* 


ASCII and graphics characters 


* 


Key references 


* 


Sound 


* 


Error messages 


* 


BASIC keywords 


* 


Planners 


* 


Connections 


* 


Printers 


* 


Joysticks 


* 


Disc organisation 


* 


Memory 



For a complete guide to the BASIC and firmware for the CPC664, consult AMSOFT 
manuals, SOFT 945 and SOFT 946 respectively. 



Parti: 

Cursor locations and control code extensions 

In a variety of applications programs, the text cursor may be positioned outside the 
current window. Various operations force the cursor to a legal position before they 
are performed, these being as follows: 
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1 . Writing a character 

2. Drawing the cursor 'blob' 

3. Obeying the control codes marked with an asterisk in the list ahead. 

The procedure for forcing the cursor to a legal position is as follows: 

1 . If the cursor is to the right of the right hand edge, then it is moved to theleftmost 
column of the next line down. 

2. If the cursor is to the left of the left hand edge, then it is moved to the rightmost 
column of the next line up. 

3. If the cursor is above the top edge, then the window is rolled down a line and the 
cursor is set to the top line of the window. 

4. If the cursor is below the bottom edge, then the window is rolled up a line and the 
cursor is set to the bottom line of the window. 

The tests and operations are done in the order given. The illegal cursor positions may 
be zero or negative, which are off to the left or above the window. 

Character values in the range to 31 sent to the text screen do not produce a 
character on the screen but are interpreted as CONTROL CODES (and should not be 
injudiciously applied). Some of the codes alter the meaning of one or more of the 
following characters, which are the code's parameters. 

A control code sent to the graphics screen will merely print the conventional symbol 
related to its function if accessed via the keyboard (e.g. &07 'BEL' - (CTRL] G), It will 
execute its control function if addressed using the form of the command: 

PRINT CHR$( 807), or PRINT "ft " (where the ft is obtained by pressing 
[CTRL] G within the P R I N T statement). 

The codes marked * force the cursor to a legal position in the current window before 
they are obeyed - but may leave the cursor in an illegal position. The codes and their 
meanings are described with first their HEX value (&XX), then the decimal 
equivalent. 
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Control characters 



6TR 

A 



3 



c 



D 



F 

F 

H 



Value 


Name 


Parameter 


Meaning 


&00 


NUL 




No effect. Ignored. 


&01 1 


SOH 


to 255 


Print the symbol given by the 
parameter value. This allows the 
symbols in the range to 31 to 
be displayed. 


&02 2 


STX 




Turn off text cursor. Equivalent 
to CURSORcommandwitha <user 
switch* parameter value of 0. 


&03 3 


ETX 




Turn on text cursor. Equivalent 
to CURSOR command with a <user 
switch > parameter va) ue of 1 . 
Note that to display a cursor 
from within a BASIC program 
(other than the automatic cursor 
generated when BASIC is awaiting 
keyboard input), a C U R S R 
command witha system switch* 
parameter value of 1 must be 
used. 


&04 4 


EOT 


0to2 


Set screen mode. Parameter taken 
MOD 4. Equivalent to a H D E 
command. 


&05 5 


ENQ 


to 255 


Send the parameter character to 
the graphics cursor. 


&06 6 


ACK 




Enable Text Screen, (See &15 NAK 
ahead.) 


&07 7 


BEL 


CTK $i 


Sound Bleeper, Note that this 
flushes the sound queues. 


&08 8 


* BS 




Move cursor back one character. 
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I 

K 

L 

M 

n 

o 

f 

4 



K 



Value Name Parameter Meaning 

609 9 * TAB Move cursor forward one character. 
&0A 10 * LF Move cursor down one line. 

&0B 11 * VT Move cursor up one line. 

&0C 12 FF Clear text window and move 

cursor to top left corner. 
Equivalent to a C LS command. 

&0D 13 * CR Move cursor to left edge of 

window on current line. 

&0E 14 SO 0tol5 Set Paper Ink. Parameter taken 

MOD 16. Equivalent to PA P E R 
command. 

&0F 15 SI 0tol5 Set Pen Ink. Parameter taken MOD 

16. Equivalent to P E N command. 

610 16 * DLE Delete current character. Fills 

character cell with current 
Paper Ink. 

611 17 * DC1 ^ Clear from left edg e of window 

to, and including,the current 
character position. Fills 
affected cells with the current 
Paper Ink. 

612 18 * DC2 ^ Clear from, and including, the 

current character position to 
the right edge of window. Fills 
affected cells~with the current 
Paper Ink. 

613 19 * DC3 Cl r, '. Clear from start of window to, 

and including, the current 
character position. Fills affected 
cells with the current Paper Ink. 
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c $ > - 



r 

1/ 
W 



Value 


Name 


Parameter 


Meaning 


&14 20* 


DC4 


CUT 


Vjf Clear from, and including, the current 
| character position to the end of window. 
i-\ Fills affected cells with the current 


/'" '"" """^ 






Paper Ink. 


/ &15 21; 


NAK 


CTH& 


V Turn off text screen. The screen will not 
react to anything sent to it until after an 










ACK(&066)issent. 


&16 22 


SYN 


Otol 


Parameter MOD 2. Transparent 
option, disables, 1 enables. 


&17 23 


ETB 


0to3 


Parameter MOD 4 

sets normal graphics ink mode 

1 sets XOR graphics ink mode 

2 sets AND graphics ink mode 

3 sets OR graphics ink mode 


&18 24 


CAN 




Exchange Pen and Paper Inks. - ~"'" 


&19 25 


EM 


to 255 


Set matrix for user definable 






to 255 


character. Equivalent to a 






to 255 


SYMBOL command. Takes nine 






to 255 


parameters. The first parameter 






to 255 


specifies which character's 






to 255 


matrix to set. The next eight 






to 255 


specify the matrix. The most 






to 255 


significant bit of the first 






to 255 


byte corresponds to the top left hand 
pixel of the character cell, the least 
significant bit of the last byte 
corresponds to the bottom right 
hand pixel of the character cell. 


&1A 26 


SUB 


lto80 


Set Window. Equivalent to a 






lto80 


WINDOW command. The first two 






lto25 


parameters specify the left and 






lto25 


right hand edges of the window - the 
smaller value is taken as the left edge, 
the larger the right. The second two 
parameters specify the top and bottom 
edges of the window - the smaller value 
is taken as the top edge, the larger the 
bottom edge. 



For your reference- 



Chapter 7 Page 5 



Value 


Name 


Parameter 


Meaning 


&1B 27 


ESC 




No effect. Ignored, 


&1C 28 


FS 


0tol5 


Set Ink to a pair of colours. 






0to31 


Equivalent to an I N K command. 






0to31 


The first parameter (MOD 16) 
specifies the Ink, the next two 
(MOD 32) the required colours. 
(Parameter values 27 to 31 are 
un-defined colours.) 


&1D 29 


GS 


0to31 


Set Border to a pair of colours. 






0to31 


Equivalent to a B R D E R command. 
The two parameters (MOD 32) 
specify the two colours. 
(Parameter values 27 to 31 are 
un-defined colours.) 


&1E 30 


RS 




Move cursor to top left hand 
corner of window. 


&1F 31 


US 


lto80 


Move cursor to the given 






lto25 


position in the current window. 
Equivalent toaLOCATE command. 
The first parameter gives the 
column to move to, the second 
gives the line. 



The housekeeping of the CPC664 is provided by a sophisticated real time operating 
system. The operating system 'directs the traffic' through the computer from the 
input to the output. 

It primarily interfaces between the hardware and the BASIC interpreter - for 
example the ink flashing function, where BASIC passes the parameters - and the 
operating system gets on with the task, with one part determining what is required 
- and the other part determining the timing of these events. 

The machine operating system is generally referred to as the 'firmware', and 
comprises the machine code routines that are called by the high level commands in 
BASIC. 
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If you are tempted to PO K E around in the machine memory addresses, or CALL the 
sub-routines, save your program and listing before doing so, or you may regret it! The 
extensive operating system firmware of the CPC664 is described in SOFT 946, and is 
beyond the scope of this introductory user manual. 

In order to program extensively using machine code, it will be necessary to use an 
assembler. The DEVPAC assembler from AMSOFT comprises a relocatable Z80 
assembler, with editor, disassembler and monitor. 



Part 2: Interrupts 



The CPC664 makes extensive use of Z80 interrupts to provide an operating system 
that includes several multi-tasking features, exemplified by the A F T E R and EVERY 
structures described earlier in this manual. The precedence of the event timers is: 

Break ([ESC][ESC]) 

Timer 3 

Timer 2 (and the three sound channel queues) 

Timer 1 

Timer 

Interrupts should be included after considering the consequences of possible 
intermediate variable states at the point of interruption. The interrupt sub-routine 
itself should avoid unwanted interaction with the state of variables in the main 
program. 

The sound queues have independent interrupts of equal priority. Once a sound 
interrupt has started, it is not interrupted by any other sound interrupt. This enables 
sound interrupt routines to share variables with immunity from the effects 
mentioned above. 

When a sound queue's interrupt is enabled (by using ON SO 60SUB), it will 
immediately interrupt if the sound queue for that channel is not full, otherwise it will 
interrupt when the current sound ends and there is room for more in the queue. The 
action of interrupting disables the event, so the sub-routine must re-enable itself if 
further interrupts are required. 

Both attempting to issue a sound and testing the queue status will also disable a 
sound interrupt. 
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Part 3: ASCII and graphics characters 



ASCII 

The table below illustrates the standard ASCII reference character set using 
decimal, octal, and hex notation, together with the ASCII codes where appropriate. 
Each of the CPC664 character cells is also represented in detail in the following 
pages. 



DEC OCTAL 


HEX 


ASCII characters 


DEC OCTAL HEX 


ASCII 


DEC 


OCTAL HEX 


ASCII 





000 


00 


NUL([CTRL]a) 


50 062 


32 


2 


100 


144 


64 


d 


1 


001 


01 


SOH l[CTRI_|A) 


51 063 


33 


3 


101 


145 


69 


e 


2 


002 


02 


STX (iCTRL]B) 


52 064 


34 


4 


102 


146 


66 


f 


3 


003 


03 


ETX ([CTRLfC) 


53 065 


35 


5 


103 


147 


67 


g 


4 


004 


04 


EOT ([CTRL]D| 


54 066 


36 


6 


104 


150 


68 


h 


5 


DOS 


05 


ENQ ([CTRL]E) 


55 067 


37 


7 


105 


151 


69 


i 


6 


006 


06 


ACK (fCTRL]F) 


56 070 


38 


8 


106 


152 


6A 


j 


7 


007 


07 


BEL ([CTHLIG) 


57 071 


39 


9 


107 


153 


6B 


k 


8 


010 


08 


BS ([CTRLJH) 


58 072 


3A 




108 


154 


6C 


I 


9 


011 


09 


HT([CTRL]t) 


59 073 


3B 


• 


109 


155 


6D 


m 


10 


012 


OA 


LF |[CTRL]J) 


60 074 


3C 


< 


110 


156 


6E 


n 


11 


013 


OB 


VT |[CTRL]K) 


61 075 


3D 


= 


111 


157 


6F 





12 


014 


OC 


FF ([CTRL1L) 


62 076 


3E 


> 


112 


160 


70 


P 


13 


015 


OD 


CR ([CTRLM 


63 077 


3F 


o 


113 


161 


71 


q 


14 


016 


OE 


SO ([CTRL]N) 


64 100 


40 


m 


114 


162 


72 


r 


15 


017 


OF 


SI JCTRLJO) 


65 101 


41 


A 


115 


163 


73 


s 


16 


020 


10 


OLE ([CTRLIP) 


66 102 


42 


a 


116 


164 


74 


t 


17 


021 


11 


OC1 |[CTRL]Q) 


67 103 


43 


c 


117 


165 


75 


u 


18 


022 


12 


OC2 ([CTRLJR) 


68 104 


44 


D 


118 


166 


76 


V 


19 


023 


13 


OC3([CTRL]S) 


69 105 


45 


E 


119 


167 


77 


w 


20 


024 


14 


OC4 ([CTRLJT) 


70 106 


46 


f 


120 


170 


78 


X 


21 


025 


15 


NAK ([CTRL]U) 


71 107 


47 


G 


121 


171 


79 


y 


22 


026 


16 


SYN HCTRL]V) 


72 110 


48 


H 


122 


172 


7A 


1 


23 


027 


17 


ETB ([CTRL|W) 


73 111 


49 


I 


123 


173 


7B 


{ 


24 


030 


18 


CAN <[CTFIL]X) 


74 112 


4A 


J 


124 


174 


7C 


1 


25 


031 


19 


EM (1CTRL]Y) 


75 113 


4B 


K 


125 


175 


7D 


} 


26 


032 


1A 


SUB (ICTRL]Z) 


76 114 


4C 


L 


126 


176 


7E 




27 


033 


IS 


ESC 


77 115 


4D 


M 










28 


034 


1C 


FS 


78 116 


4E 


N 










29 


035 


1D 


GS 


79 117 


4F 













30 


036 


1E 


RS 


80 120 


50 


P 










31 


037 


1F 


US 


81 121 


51 


Q 










32 


040 


20 


SP 


82 122 


52 


R 










33 


041 


21 


; 


83 123 


53 


S 










34 


042 


22 


" 


84 124 


54 


T 










35 


043 


23 


# 


85 125 


55 


U 










36 


044 


24 


$ 


86 126 


56 


V 










37 


045 


25 


X 


87 127 


57 


u 










38 


046 


26 


s 


86 130 


58 


X 










39 


047 


27 


1 


89 131 


59 


Y 










40 


050 


28 


( 


90 132 


5A 


I 










41 


051 


29 


) 


91 133 


5B 


[ 










42 


052 


2A 


* 


92 134 


5C 


\ 










43 


053 


2B 


+ 


93 135 


5D 


] 










44 


054 


2C 




94 136 


5E 


r 










45 


055 


2D 


- 


95 137 


5F 


- 










46 


056 


2E 




96 140 


60 












47 


OS 7 


2F 


/ 


97 141 


61 


a 










48 


060 


30 





98 142 


62 


b 










49 


061 


31 


1 


99 143 


63 


c 
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-*■ r 



Machine specific graphics character set 



The characters reproduced here are plotted on the standard 8 
x 8 cell matrix used to write the screen of the CPC664. User 
defined characters may be grouped for special effects, and 
butted next to one another. See the section 'User Defined 
Characters' in the chapter entitled 'At your leisure. . „\ 



■ 



33 

&H21 

&X001 00001 



jiJS:: 



34 

&H22 

&X001 00010 



f:fs 

'■■■■i 




■"TBI 



11111 



35 

&H23 
&XO0 100011 



32 &H20 
&X001 00000 




36 

&H24 

&X00100100 




37 

&H25 

&X00100101 



S5K 



38 

&H26 

&X00100110 



39 

&H27 

&X00100111 



Hffl 



40 

&H28 

&X00101000 




41 

&H29 
&X00 101001 




42 

&H2A 

&X00101010 



I I | I II 

SI 



BB 



43 

&H2B 

&X00101011 



gg 



44 

&H2C 

&X00101100 



45 

&H2D 

&X00101101 



■■III 

war 

i i i m m 



46 

&H2E 

&X00101110 



m 



m 



47 

&H2F 

&X001 01111 




48 

&H30 

&X001 10000 
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i m m 



JHJ ™t 



~H~ «nT 



49 

&H31 
&X00 110001 



JEffi 



50 
&H32 

&X001 10010 



51 

&H33 

&X001 10011 



3S+S 






52 

&H34 

&X001 10100 



J"™?: 



53 
&H35 

&X001 10101 



54 
&H36 

&X00110110 



55 

&H37 

&X00110111 



56 

&H38 

&X00111000 




fl 



eb 



s 



U 



in 



57 
&H39 

&X00111001 



58 

&H3A 
&X001 11010 



59 

&H3B 

&X00111011 



60 

&H3C 

&X00111100 



S+fflF: 



■WW- 










61 

&H3D 
&X001 11101 



62 

&H3E 

&X00111110 



63 

&H3F 

&X00111111 



64 

&H40 

&X01 000000 



■MUM 



-IFFfc 

■rn 




m 





65 

&H41 

&X01 000001 



66 
&M42 

&X01 000010 



67 
&H43 

&X01 000011 



68 

&H44 

&X01000100 
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_■ 
_■ 
_■ 




m=: 



■ ■ r ■ ri 

69 

&H45 

&X01000101 



ft 


R 


—, 


l 


-■■CI 








.iiJ- 








juwuc 








rmn- 









70 

&H46 

&X01OOO110 




71 

&H47 

&X01O0O111 




72 

&H48 
&X01 001000 




SSlUU" 

i rrrrrn 



73 

&H49 

&X01001001 




74 

&H4A 
&X01 001010 




75 

&H4B 

&X01001011 



■S¥: ::: 


HM_ 


We 

Trrrrn 



76 

&H4C 

&X01001100 




77 

&H4D 

&X01001101 




78 

&H4E 

&X01001110 




79 

&H4F 

&X01001111 




80 

&H50 
&X01 010000 



■3Hx" 

irfii 



81 

&H51 

&X01010001 




82 

&H52 

&X01010010 




83 

&H53 

&X01010011 





s 


p 


8 




















J 









84 

&H54 

&X01010100 




85 

&H55 

&X01010101 




86 

&H56 

&X01010110 




87 

&H57 

&X01010111 




88 

&H58 

&X01011000 
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m 



89 

&H59 

&X01011001 



90 91 

&H5A &H5B 

&X01011010 &X01011011 



92 
&H5C 

&X01011100 




X _.■■□_ I 

m 



K55 



93 

&H5D 

&X01011101 



94 95 

&H5E &H5F 

&X0101111O &X01011111 



96 

&H60 
&X01 100000 







Fffffl 



IIUI 

JWLLi 



FFr: 
-sa: 

Iwflffl 



97 

&H61 

&X0 1100001 



98 

&H62 
&X01 100010 



99 

&H63 
&X01 100011 



100 

&H64 

&X01100100 




101 
&H65 
&X01 100101 






ffffi 




IP- 

■iri 




102 

&H66 

&X01100110 



103 

&H67 

&X0110O111 



104 
&H68 

&X01101000 




105 

&H69 

&X0 1101001 





m 



106 
&H6A 
&X01 101010 



107 
&H6B 

&X01101011 



108 

&H6C 

&X01101100 
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PES 

m 



_BE_B 
-■HI-" 

_■■:_■ 



109 
&H6D 
&X01 101101 



110 

&H6E 

&X01101110 





111 

&H6F 

&X01101111 



112 
&H70 
&X01 110000 



P 

rTt J bM 

113 
&H71 
&X01 110001 



■■"■■ 

-BE"' 

■■■ ■ 
mm 



114 
&H72 
&X01 110010 





115 
&H73 
&X01 110011 



116 
&H74 
&X01 110100 




117 
&H75 
&X01 110101 




118 

&H76 

&X01110110 





119 
&H77 
&X01 110111 



120 
&H78 
&X01 111000 




121 

&H79 

&X01111001 






122 
&H7A 
&X011 11010 



123 

&H7B 

&X01111011 



124 

&H7C 

&X01111100 




125 

&H7D 

&X01111101 




126 

&H7E 

&X01111110 



127 

&H7F 

&X01111111 



128 

&H80 

&X1 0000000 
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129 

&H81 

4X 10000001 



^■' 


■■ 
■■ 
■■ 


_„ZH"' 


_IS« 


Zpmiii 


















130 

&H82 

4X10000010 


■■ 


; 


■1 


■■ 


■■■E 


■i 


■■■E 




■■■E 




■■■B- 


_j 



■■■■■■■■ 

■■■■■■■■ 

miini 


t~ -~ 3 


t __ j 


t_n j 


131 

&H83 

4X10000011 

Ml 

■■■■■■■I 

■■■■T 


■■■E_ - 


■■■Si 


■■■^ ii 



































■■■ 


■ _- 


■■■ 


1- 


■■■ 


i- -- 


■■■ 




132 

&H84 

4X10000100 








































■■■■ 








■■■■ 








■■■■ 








■■■■ 



133 


134 


135 


136 


&H85 


&H86 


&H87 


&H88 


&X1 00001 01 


&X10000110 


4X10000111 


&X1 0001 000 




137 

&H89 
4X10001001 




138 

4H8A 

&X1 0001 010 



f ■■■■ 

t ■■■■ 

t ■■■■ 



139 

&H8B 

&X1 0001 011 



■■■■■■■a 
■■■■■■■■ 

■■■■■■■■ 



140 

&H8C 

&X1 0001 100 



■■■TTTT 




141 

&H8D 

4X1 0001 101 



142 

&H8E 
4X10001110 



143 
&H8F 

&X1 0001111 



H 



144 

&H90 

4X10010000 



BB 



145 

4H91 

4X1 001 0001 




146 

4H92 

4X10010010 



147 

4H93 

&X1 001 0011 



::JI::: 

■■: 



148 

4H94 

4X10010100 



Chapter 7 Page 14 



For your reference.. 




149 

&H95 

&X10010101 



eeesH 



150 

&H96 

&X1 00101 10 




151 

&H97 

&X10010111 




152 

&H98 

&X1 001 1000 




153 

&H99 

&X1 001 1001 



ffl 



FtfffW 



154 

&H9A 

&X1 001 1010 




155 

&H9B 

&X10011011 




156 

&H9C 

&X10011100 




157 

&H9D 

&X10011101 




158 

&H9E 

&X10011110 



mm 

■■■r 

El 




159 

&H9F 

&X10011111 




160 

&HA0 

&X1 01 00000 





w 


171 




































161 
&Hi 
&X 

[-■ 


M 
I0100C 

■■■■■ 

m9_i 

IKI 


101 



165 

&HA5 

&X10100101 




162 

&HA2 

&X1 01 00010 







166 

&HA6 

&X10100110 



■^r 



si™ 

riiTn_ 

rrrrrrn 



163 

&HA3 

&X1 01 00011 



167 

&HA7 

&X10100111 




164 

&HA4 

&X10100100 




168 

&HA8 

&X10101000 
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169 

&HA9 

&X10101001 




JT"bS~I 



mm 



170 

&HAA 

&X10101010 



171 

&HAB 

&X1O1O1011 




172 
&HAC 

&X101O1100 



I 



m 



173 

&HAD 

&X1O101101 



in m 



m 



a 



m 



174 

&HAE 

&X10101110 



175 
&HAF 
&X101 01111 




176 

&HB0 

&X1 01 10000 



■SfPpHI_ 

■Brr §■_ 



177 

&HB1 

&X1 01 10001 




IHfflF 1 



178 

&HB2 

&X10110010 



179 

&HB3 

&X1 01 10011 



I 




fflHB 



180 

&HB4 

&X1 01 10100 



^MTTmmz 

m 



181 

&HB5 

&X10110101 



H 




182 

&HB6 

&X10110110 



183 

&HB7 

&X10110111 




184 
&HB8 

&X101 11000 



s 



■eh 



185 

&HB9 

&X10111001 





186 

&HBA 
&X101 11010 



187 

&HBB 

&X10111011 



JEFF 



X 



188 

&HBC 

&X10111100 
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/$ 0, /j 61, U t Si] M, 9^ e 
f *.*«.*?,'?, 'ft/'*,**'- 






189 

&HBD 

&X10111101 



190 

&HBE 

&X10111110 



191 

&HBF 
&X10111111 



192 

&HCO 

&X1 1000000 



m 




Effiffi 



193 

&HC1 

&X1 1000001 



194 

&HC2 

&X1 1000010 



195 

&HC3 

&X1 1000011 



Beam 






196 

&HC4 

&X1 1000100 



HE 






■K+5H 1 






197 

&HC5 

&X1 10001 01 



198 

&HC6 

&X1 10001 10 



199 

&HC7 

&X11000111 



~r~HJrrF 



200 

&HC8 

&X1 1001000 







201 

&HC9 

&X1 1001 001 



202 

&HCA 

&X1 1001010 



i_l I M 

safe 

203 

&HCB 

&X1 1001 011 






204 

&HCC 

&X11001100 



■ 



«I 





205 
&HCD 
&X1 1001 101 



206 

&HCE 

&X1 1001 110 



207 

&HCF 

&X11001111 



208 

&HD0 

&X1 1010000 
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209 

4HD1 

&X1 101 0001 



210 

&HD2 

&X1 101 0010 



211 

4HD3 

4X11010011 



■■!■ 

m 



212 

&HD4 

4X11010100 



»i 



Hi 



213 
&HD5 

&X11010101 



I ■ 

ITM 

ITBBIIB 
III II 



214 
&HD6 

&X11010110 



Sffl 

■■■■~tt_ 
■■■■■rt : 

■■■■■■r_ 



215 

&HD7 

4X11010111 




216 

4HD8 

&X1 1011000 




217 

&HD9 

&X1 101 1001 




221 
&HDD 

4X11011101 

TWMBBL 



225 
&HE1 

4X11100001 




218 
&HDA 

&X11011010 



■ 



222 
&HDE 

&X1101111O 




226 
4HE2 

&X1 1100010 



n 




219 

&HDB 

&X11011011 




223 
&HDF 

4X11011111 



(St 



227 
&HE3 

4X11100011 
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220 

&HDC 

4X11011100 




224 

4HE0 

4X111O0O0O 



ems vsm iss 




228 

4HE4 

4X11100100 
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P5SS 







229 
&HE5 

4X11100101 



230 

&HE6 

&X111O011O 



231 

&HE7 

&X11100111 



232 

4HE8 

&X11101000 




■Bdlbi 

SrFB 



j>:r 

JUII! 




■HI 




233 

&HE9 
&X11101001 



w 



234 

4HEA 

4X11101010 



235 

&HEB 

4X11101011 



236 

4HEC 

4X11101100 



§ 





E 






237 
4HED 

4X11101101 



238 

4HEE 

&X11101110 



239 

4HEF 

4X11101111 



240 

4HF0 

4X11110000 



rrTBBTT ■■■■! 

aHHIl 

■■■in 
IKE 

241 

4HF1 

4X11110001 



ebb mm 



■■:i 



242 

4HF2 

4X11110010 



243 

4HF3 

4X11110011 



244 

4HF4 

4X11110100 




■■■■■ 



EFBB 

rrnm 



m ii 



B+flK 



iffi 



245 

4HF5 

4X11110101 



246 

4HF6 

4X11110110 



247 

&HF7 

4X11110111 



248 

4HF8 

4X11111000 
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&vm 





xrr 



eh 




249 

&HF9 

4X11111001 



250 

&HFA 

&X11111010 



251 

&HFB 

&X11111011 



252 

&HFC 

&X11111100 



TT 






m 



zrrmWT_ 
\ m m nr ~ 



il 



253 


254 


255 


&HFD 


&HFE 


&HFF 


&X11111101 


&X11111110 


&X11111111 
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Part 4: Key references 



Default ASCII values 



Tto poo at m 

U_lI IflULL LLLL 



O) 




(0 



oo 



in 

H 



B[|] 
ED 

SB 



if 



V 
i 



^ 



tfcft 



iSlfc 



88 



S3 



^[S 



WJs8 



£8g 









PBW 






£££! 



(NCI 



J3S 






S3 



psc 







W 01 


LULL 
























LLHJJLU 








NMCM 
















333 








28S 





55s 



y 



y 

1- 



•< -v. 
h- .*■■ 




















LU(Oco<o 

QCOt CD 

it 






CO (D 
CM « 


in to 

CM CO 




CN 

LL 
















CM CM CM 











0)0) 

00 




















LU<< 
KlOLO 
LL 






CD GO 
OO 


00 


M 
LLjCOOO 

Elolo 

LL 


















1 


00 00 

00 
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- 


t 

& 


\ 


sas 

tntnkg 




ESS 




auras 
own 




535S 



Expansion characters, 
default locations and 
values 



_l 


tr 






LU 
□ 

(r 

_i 
V 


B 

g 

a 



|t8«| 

H 


»- 
z 

LU 

a a 


00 
00 

00 

S@ 
00 

00 

00 


LL 
X 
CO 

H 






LU 


CO 





X 


a 


*« 


* 


W 








< 

■ — 


N 




m 


< 

i- 


69 


X 

co 





EXPANSION 
CHARACTER 


DEFAULT SETTING 


CHARACTER 


ASCII VALUE 


0(128) 

1(129) 

2(130) 

3(131) 

4(132) 

5(133) 

6(134) 

7(135) 

8(136) 

9(137) 

10(138) 

11(139) 

12(140) 



1 
2 
3 
4 
5 
6 
7 
8 
9 

[ENTER) 

RUN "[ENTER] 


&30 
&31 
&32 
&33 
&34 
&35 
&36 
&37 
&38 
&39 
&2E 
&0D 
&52 &5S &4E &22 &0D 


Note: Expansion characters 13 to 31 (141 to 159) have a null 
value by default. They have values assigned using the 
BASIC command KEY, and are assigned to keys using the 
command KEY D E F . 
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Key and joystick numbers 



O fl> (M 


0000 
ESS * 













(M 

3 

8 
E 
8 




» 




K 

CM 
CM 

s 

CO 

0) 

CO 

8 

ID 

ID 

If) 

CM 

2 

CM 




r-»- 

CD 

CM 

CO 

If) 
co 

CO 

55 

s 
s 

& 
8 




a 

in 

CM 

If) 

Si 
c 
S 
S 

R 




CO 

CM 

5 





y 



cj 







L*5 




















FIREl 
53 






CO 


0) 


FIRE 2 
52 




















O 
LO 
















ie 




















FIREl 
77 






P! 


£ 


FIRE 2 
76 




















Ft 
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Part 5: Sound 

Notes and tone periods 

The table which follows, gives the recommended < tone period* settings for notes in the 
usual even tempered scale, for the full eight octave range. 

The frequency produced is not exactly the required frequency because the <tone 
period> setting has to be an integer. The RELATIVE ERROR is the percentage ratio 
of the difference between the required and actual frequency. 



NOTE 


FREQUENCY 


PERIOD 


RELATIVE ERROR 


C 


32.703 


3822 


-0.007% 


C# 


34.648 


3608 


+0.007% 


D 


36.708 


3405 


-0.007% 


D# 


38.891 


3214 


-0.004% 


E 


41 .203 


3034 


-i.%% °— * 


F 


43.654 


2863 


F# 


46.249 


2703 


+0.009% 


G 


48.999 


2551 


-0.002% 


G# 


51.913 


2408 


+0.005% 


A 


55.000 


2273 


+0.012% 


A# 


58.270 


2145 


-0.008% 


B 


61 .735 


2025 


+0.011% 


NOTE 


FREQUENCY 


PERIOD 


RELATIVE ERROR 


C 


65.406 


1911 


-0.007% 


c# 


69.296 


1804 


+0.007% 


D 


73.416 


1703 


+0.022% 


Dff 


77.782 


1607 


-0.004% 


E 


82.407 


1517 


+0.009% 


F 


87.307 


1432 


+0.019% Octave -2 


F# 


92.499 


1351 


-0.028% 


G 


97.999 


1276 


+0.037% 


G# 


103.826 


1204 


+0.005% 


A 


110.000 


1136 


-0.032% 


A# 


116.541 


1073 


+0.039% 


B 


123.471 


1012 


-0.038% 
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NOTE 


FREQUENCY 


PERIOD 


RELATIVE ERROR 


C 


130.813 


956 


+0.046% 


C# 


138.591 


902 


+0.007% 


D 


146.832 


851 


-0.037% 


D# 


155.564 


804 


+0.058% 


E 


164.814 


758 


-0.057% _. 

+ 0.019% 0ctave ' 1 


F 


174.614 


716 


F# 


184.997 


676 


+0.046% 


G 


195.998 


638 


+0.037% 


G# 


207.652 


602 


+0.005% 


A 


220.000 


568 


-0.032% 


A# 


233.082 


536 


-0.055% 


B 


246.942 


506 


-0.038% 


NOTE 


FREQUENCY 


PERIOD 


RELATIVE ERROR 


C 


261.626 


478 


+0.046% Middle C 


at 


277.183 


451 


+0.007% 


D 


293.665 


426 


+0.081% 


D# 


311.127 


402 


+0.058% 


E 


329.628 


379 


-0.057% _ . „ 
+ 0.019% Octave 


F 


349.228 


358 


fit 


369.994 


338 


+0.046% 


G 


391.995 


319 


+0.037% 


G# 


415.305 


301 


+0.005% 


A 


440.000 


284 


-0.032% International a 


A# 


466.164 


268 


-0.055% 


B 


493.883 


253 


-0.038% 


NOTE 


FREQUENCY 


PERIOD 


RELATIVE ERROR 


C 


523.251 


239 


+0.046% 


C# 


554.365 


225 


-0.215% 


D 


587.330 


213 


+0.081% 


bit 


622.254 


201 


+0.058% 


E 


659.255 


190 


+0.206% 


F 


698.457 


179 


+ 0.019% Octave 1 


F# 


739.989 


169 


+0.046% 


G 


783.991 


159 


-0.277% 


G# 


830.609 


150 


-0.328% 


A 


880.000 


142 


-0.032% 


A# 


932.328 


134 


-0.055% 


B 


987.767 


127 


+0.356% 
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NOTE 


FREQUENCY 


PERIOD 


RELATIVE ERROR 


C 


1046.502 


119 


-0.374% 


C# 


1108.731 


113 


+0.229% 


D 


1174.659 


106 


-0.390% 


D# 


1244.508 


100 


-0.441% 


E 


1318.510 


95 


+0.206% 


F 


1396.913 


89 


-0.543% Octave 2 


F# 


1479.978 


84 


-0.548% 


G 


1567.982 


80 


+0.350% 


G# 


1661.219 


75 


-0.328% 


A 


1760.000 


71 


-0.032% 


A# 


1864.655 


67 


-0.055% 


B 


1975.533 


63 


-0.435% 


NOTE 


FREQUENCY 


PERIOD 


RELATIVE ERROR 


C 


2093.004 


60 


+0.462% 


C# 


2217.461 


56 


-0.662% 


D 


2349.318 


53 


-0.390% 


Dfl 


2489.016 


50 


-0.441% 


E 


2637.021 


47 


-0.855% 


F 


2793.826 


45 


:g : !™l 0^3 


F# 


2959.955 


42 


G 


3135.963 


40 


+0.350% 


G# 


3322.438 


38 


+0.992% 


A 


3520.000 


36 


+1.357% 


A# 


3729.310 


34 


+1.417% 


B 


3951.066 


32 


+1.134% 


NOTE 


FREQUENCY 


PERIOD 


RELATIVE ERROR 


C 


4186.009 


30 


+0.462% 


at 


4434.922 


28 


-0.662% 


D 


4698.636 


27 


+1.469% 


D# 


4978.032 


25 


-0.441% 


E 


5274.041 


24 


+1.246% 


F 


5587.652 


22 


- 1 .685% — . . 

-0.548% 0ctave4 


F# 


5919.911 


21 


G 


6271.927 


20 


+0.350% 


G# 


6644.875 


19 


+0.992% 


A 


7040.000 


18 


+1.357% 


A# 


7458.621 


17 


+1.417% 


B 


7902.133 


16 


+1.134% 



The above values are all calculated from International A as follows: 

FREQUENCY =440* (2 f(OCTAVE+C(N-10)/12))) 
PERIOD = ROUND ( 12 5000/ FREQUENCY) 

....where N is 1 for C, 2 for C#, 3 for D,etc. 
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Part 6: Error messages 



1 Unexpected NEXT 

A N E X T command has been encountered while not in a FOR loop, or the control 
variable in the NEXT command does not match that in the FOR. 

2 Syntax Error 

BASIC cannot understand the given line because a construct within it is not legal. 

3 Unexpected RETURN 

A R E T U R N command has been encountered when not in a sub-routine. 

4 DATA exhausted 

A R E A D command has attempted to read beyond the end of the last DATA. 

5 Improper argument 

This is a general purpose error.The value of a function's argument, or a command 
parameter is invalid in some way. 

6 Overflow 

The result of an arithmetic operation has overflowed. This may be a floating point 
overflow, in which case some operation has yielded a value greater than 1.7E \ 38 
(approx.). Alternatively, this may be the result of a failed attempt to change a 
floating point number to a 16 bit signed integer. 

7 Memory full 

The current program or its variables may be simply too big, or the control structure is 
too deeply nested (nested GOSUBs,WHILEsorFORs). 

A MEMORY command will give this error if an attempt is made to set the top of 
BASIC'S memory too low, or to an impossibly high value. Note that an open file has a 
buffer allocated to it, and that may restrict the values that MEMORY may use. 
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8 Line does not exist 

The line referenced cannot be found. 

9 Subscript out of range 

One of the subscripts in an array reference is too big or too small. 

10 Array already dimensioned 

One of the arrays in a D I M statement has already been declared. 

11 Division by zero 

May occur in real division, integer division, integer modulus or in exponentiation. 

12 Invalid direct command 

The last command attempted is not valid in direct mode. 

1 3 Type mismatch 

A numeric value has been presented where a string value is required or vice versa, or 
an invalidly formed number has been found in READ or INPUT, 

14 String space fulL 

So many strings have been created that there is no further room available, even after 
'garbage collection'. 

15 String too long 

String exceeds 255 characters in length. May be generated by appending strings 
together. 

16 String expression too complex 

String expressions may generate a number of intermediate string values. When the 
number of these values exceeds a reasonable limit, this error results. 
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1 7 Cannot CONTi nue 

For one reason or another the current program cannot be restarted using C N T . Note 
that CONT is intended for restarting after a STOP command, [ESC] [ESC], or an 
error, and that any alteration of the program in the meantime makes a restart 
impossible. <.")<£■*.«.. J *i. <£*"**•■*-- .' n<y£~ /'*' /*v 

18 Unknown user function 

No DEF FN has been executed for the FN just invoked. 

19 RESUME mi ssing 

The end of the program has been encountered while in error processing mode (i.e. in 
an ON ERROR GOTO routine). 

20 Unexpected RESUME 

R E S U M E is only valid while in error processing mode (i.e.inan ON ERROR GOTO 
routine). 

21 Direct command found 

When loading a file, a line without a line number has been found. 

22 Operand mi ssi ng 

BASIC has encountered an incomplete expression. 

23 Line too Long 

A line when converted to BASIC internal-form becomes too big. 

24 EOF met 

An attempt has been made to read past end of the file input stream. 

25 Fi Le type error 

The file being read is not of a suitable type. P E N I N is only prepared to open ASCII 
text files. Similarly, LOAD, RUN, etc, are only prepared to deal with file types 
produced by S A V E . 

For your reference.... Chapter 7 Page 29 



26 NEXT mi ssi ng 

Cannot find a N E X T to match a F R command. A line number accompanying this 
message indicates the FOR command to which this error applies. 

27 File a L ready open 

AnOPENINorOPENOUT command has been executed before the previously opened 
file has been closed. 



28 Unknown command 

BASIC cannot find a taker for an external command, i.e. a command preceded by a 
bar I . 

29 WEND missing 

Cannot find a W E N D to match a W H I L E command. 

30 Unexpected WEND 

Encountered a W E N D when not in a W H I L E loop, or a W E N D that does not match the 
current WHILE loop. 

31 File not open 

(See the section ahead entitled 'Disc errors'.) 

32 Broken in 

(Seethe section ahead entitled 'Disc errors'.) 



Disc errors 

There are several errors that may occur during the processing of any filing 
operations. BASIC handles all such errors as ERRor number 3 2, however more 
specific information may be returned by the function D E R R when this error number 
is detected. This returns values as follows: 
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AMSDOS error 


D E R R value 


Cause of error 





0or22 


[ESC] has been pressed. 


14 


142(128+14) 


The stream is not in a suitable state. 


15 


143(128+15} 


Hard end of file has been reached. 


16 


144(128+16) 


Bad command, usually an incorrect 
filename. 


17 


145(128+17) 


File already exists. 


18 


146(128+18) 


File does not exist. 


19 


147(128+19) 


Directory is full. 


20 


148(128+20) 


Disc is full. 


21 


149(128+21) 


Disc changed while files were open. 


22 


150(128+22) 


File is Read/Only. 


26 


154(128+26) 


Soft end of file has been detected. 



If AMSDOS has already reported an error, then bit 7 is set; hence the value of D E R R 

is offset by 128. --- IX-" ■' '■'■' 

Other values returned by DERR originate from the disc controller and are bit 
significant, always with bit 6 set. Bit 7 indicates whether the error has been reported 
by AMSDOS (as explained above). The significance of each bit is as follows: 



Bit 


Significance 


'o 


Address mark missing. 


1 


Not writable - disc is write protected. 


2 


No data - can't find the sector. 


- 3 


Drive not ready - no disc in the drive. 


4 


Overrun error. 


5 


Data error - CRC error. 


6 


Always set to 1 to indicate error from disc controller. 


■■, 7 


Set to 1 if error has already been reported by AMSDOS. 
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ERR may also return 3 1 if access was attempted when no file was open. The usual 
way in which one may use ERR and DERR would be to include an ON 
ERROR GOTO which calls a short routine that checks if E R R has the value 3 1 or 
3 2 , and if it is 32, DERR could be interrogated to give more detailed information 
regarding the nature of the error. For example: 

10 ON ERROR GOTO 1000 

20 OPENOUT "myfi Le.asc" 

30 WRITE #9, "test-data" : , ., // / l ' 

40 CLOSEOUT ;U "" "" 

50 END 

1000 amsdoserr=(DERR AND &7F):REH mask off bit 7 

1010 IF ERR<31 THEN END 

1020 IF ERR=31 THEN PRINT "are you sure you've typed 

Line 20 correct Ly?" : END 
1030 IF amsdoserr=20 THEN PRINT "disc is full, suggest 

you use a new data disc":END 
1040 IF amsdoserr=&X01001000 THEN PRINT "put a disc in 

the drive, then press a key":WHILE INKEYS**"": 

WEND:RESUHE ^ 

1050 END 
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art 7: BASIC Keywords 



The following is a list of all AMSTRAD CPC664 BASIC keywords. As such, they are 
reserved and can NOT be used as variable names, 

ABS, AFTER, AND, ASC, ATN, AUTO 

BINS, BORDER 

CALL, CAT, CHAIN, CHR$, CINT, CLEAR, CLG, CLOSEIN, CLOSEOUT, CLS, 
CONT, COPYCHRS, COS, CREAL, CURSOR 

DATA, DECS, DEF, DEFINT, DEFREAL, DEFSTR, DEG, DELETE, DERR, DI, 
DIM, DRAW, DRAWR 

EDIT, EI, ELSE, END, ENT, ENV, EOF, ERASE, ERL, ERR, ERROR, EVERY, 
EXP 

FILL, FIX, FN, FOR, FRAME, FRE 
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GOSUB, GOTO, GRAPHICS 

HEX$, HIHEM 

IF, INK, INKEY, INKEY$, INP, INPUT, INSTR, INT 

JOY 

KEY 

LEFTS, LEN, LET, LINE, LIST, LOAD, LOCATE, LOG, LOG10, LOWERS 

MASK, MAX, MEMORY, MERGE, MIDS, MIN, MOD, MODE, MOVE, MOVER 

NEXT, NEW, NOT 

ON, ON BREAK, ON ERROR GOTO 0, ON SQ, OPENIN, OPENOUT, OR, 
ORIGIN, OUT 

PAPER, PEEK, PEN, PI, PLOT, PLOTR, POKE, POS, PRINT 

RAD, RANDOMIZE, READ, RELEASE, REM, REMAIN, RENUM, RESTORE, 
RESUME, RETURN, RIGHTS, RND, ROUND, RUN 

SAVE, SGN, SIN, SOUND, SPACES, SPC, SPEED, SQ, SQR, STEP, STOP, 
STR$, STRINGS, SWAP, SYMBOL 

TAB, TAG, TAGOFF, TAN, TEST, TESTR, THEN, TIME, TO, TROFF, TRON 

UNT, UPPERS, USING 

VAL, VPOS 

WAIT, WEND, WHILE, WIDTH, WINDOW, WRITE 

XOR, XPOS 

YPOS 

ZONE 
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Part 8: Planners 

Text and window planner - MODE (20 columns) 
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Text and window planner - MODE 1 (40 columns) 
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Text and window planner - MODE 2 (80 columns) 
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For your reference.. 



Sound envelope/music planner 




C5 Ol 
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Part 9: Connections 



CPC664 Input/Output Sockets 



iiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiHniiiiiiiiiii 

I 5VDC SOCKET 





DISC DRIVE 2 SOCKET 

MONITOR SOCKET 



PRINTER SOCKET 
13VDCPLUQ EXPANSION SOCKET 



pnr 



J§L 



t 1 1 



TAPE SOCKET 



STEREO SOCKET 



JOYSTICK SOCKET 



Joystick Socket 







VIEWED FROM REAR 

2 3 4 

• • • 



<Z> 



PIN 1 


UP 


PIN 6 


FIRE 2 


PIN 2 


DOWN 


PIN 7 


FIRE 1 


PIN 3 


LEFT 


PIN 8 


COMMON 


PIN 4 


RIGHT 


PIN 9 


COM 2 


PIN 5 


SPARE 
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Monitor Socket 



Stereo Socket 



C 



Tape Socket 



VIEWED FROM REAR 




5 1 

6 
4 ~ 2 



PIN 


1 


RED 


PIN 


4 


SYNC 


PIN 


2 


GREEN 


PIN 


5 


GNO 


PIN 


3 


BLUE 


PIN 


6 


LUM 



RIGHT 



XX) 



A. 



V" 



GND LEFT 



VIEWED FROM REAR 




LEFT 

- RIGHT 
■GND 



PIN 1 REMOTE SWITCH 

PIN 2 GND 

PIN 3 REMOTE SWITCH 


PIN 4 DATA IN 
PINS DATA OUT 



PIN 1 LEFT CHANNEL 
PIN 2 RIGHT CHANNEL 
PIN 3 GND 
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Expansion Socket 



VIEWED FROM REAR 



49 47 45 43 41 39 37 35 33 31 W 21 25 23 21 19 11 1S 13 11 



BO IB 46 



42 40 38 36 



32 30 2B 26 2* 12 20 IB 16 14 12 10 



PIN 


1 


SOUND 


PIN 18 


AO 


PIN 35 


INT 


PIN 


2 


GND 


PIN 19 


D7 


PIN 36 


NMI 


PIN 


3 


A15 


PIN 20 


D6 


PIN 37 


BUSR2 


PIN 


4 


A14 


PIN 21 


D5 


PIN 38 


BUSAK 


PIN 


5 


A13 


PIN 22 


D4 


PIN 39 


READY 


PIN 


6 


A12 


PIN 23 


D3 


PIN 40 


BUS RESET 


PIN 


7 


A11 


PIN 24 


D2 


PIN 41 


RESET 


PIN 


8 


A10 


PIN 25 


D1 


PIN 42 


ROM EN 


PIN 


9 


A9 


PIN 26 


DO 


PIN 43 


ROMDIS 


PIN 


10 


A8 


PIN 27 


H 5v 


PIN 44 


RAMRD 


PIN 


11 


A7 


PIN 28 


MREQ 


PIN 45 


RAMDIS 


PIN 


12 


A6 


PIN 29 


M1 


PIN 46 


CURSOR 


PIN 


13 


A5 


PIN 30 


RFSH 


PIN 47 


L. PEN 


PIN 


14 


A4 


PIN 31 


IORQ 


PIN 48 


EXP 


PIN 


15 


A3 


PIN 32 


RD 


PIN 49 


GND 


PIN 


16 


A2 


PIN 33 


WR 


PIN 50 


* 


PIN 


17 


A1 


PIN 34 


HALT 







Disc Drive 2 Socket 
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PIN 2 


GND 
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PIN 3 
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PIN 20 


GND 


PIN 4 


GND 


PIN 21 


N/C 
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READ DATA 


PIN 22 


GND 


PIN 6 


QND 


PIN 23 


DRIVE SELECT 1 


PIN 7 


WRrTE PROTECT 


PIN 24 


GND 


PINS 


GND 


PIN 25 


N/C 


PINS 


TRACK 


PIN 26 


GND 


PIN 10 


QND 


PIN 27 


INDEX 


PIN 11 


WRITE GATE 


PIN 26 


GND 


PIN 12 


GND 


PIN 29 


N/C 


PIN13 


WRITE DATA 


PIN 30 


GND 


PIN14 


GND 


PIN 31 


N/C 


PIN 15 


STEP 


PIN 32 


GND 


PIN 16 


GND 


PIN 33 


N/C 


PIN 17 


DIRECTION SELECT 


PIN 34 


GND 
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Printer Port 
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BUSY 
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GND 
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GND 


PIN 33 


GND 
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GND 


All other 
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Part 10: Printers 

Printer interfacing 

The CPC664 allows the connection and use of an industry standard 'Centronics style 
interface' printer. 

The printer cable is simply constructed as a one-to-one connection between the 
PRINTER socket at the rear of the computer, and the connector on the parallel 
printer. Note that there are two less 'fingers' on the computer printed circuit board 
than on the printer connector. This is to allow the use of a standard printed circuit 
board edge connector. 

The actual pin interface details are illustrated in part 9 of this chapter. 

The cable should be constructed so that pin 1 from the computer connects to pin 1 on 
the printer; pin 19 from the computer to pin 19 on the printer, etc, etc. However, pins 
18 and 36 of the printer should NOT be connected to the computer. 
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Note that although there are 17 fingers on the upper row of the computer's PRINTER 
socket, the lower row of fingers is numbered 19 onwards {rather than 18 onwards). 
This is so that every wire used, connects between exactly the SAME NUMBERED 
finger of the computer's edge connector as pin of the socket on the printer itself. 

The computer uses the BUSY signal (pin 1 1) to synchronise with the printer, and will 
wait if the printer is OFF-LINE . 

There are no user set-up commands required, and the output is directed to the printer 
by specifying stream # 8 . 

Although the CPC664's PRINTER port is envisaged for use with low cost dot-matrix 
printers; with a suitable interface it will support daisywheel printers, graphics 
plotters, and multi-colour ink-jet printers. The key to compatibility is the standard 
parallel interface. 

The customised software in the AMSTRAD DMP1 printer facilitates dot-graphics 
operation, together with the printing of complete screen dumps. 



Printer configuration 

A facility is provided whereby special characters which may appear on the screen and 
which are supported by the AMSTRAD DMP1, will be printed even though the 
character codes for the screen and printer may be different. The majority of these 
symbols will only be available when the printer is switched to one of its foreign 
language modes. For example: 

PRINT CHRSC&A0) 

A 

PRINT #8,CHR$(&A0) 
A isprintedontheprinter. 

This works even though the character code for a circumflex accent on the DMP1 is 
85 E. In other words, the printer routine has recognised 8A0 as one of the codes held 
in a printer translation table, and has translated it to 8 5 E so that the same character 
appearing on the screen will be printed by the printer. The code 8 5 E will produce a 
circumflex accent on a DMP1 no matter which language mode the printer is set to 
(this is not true for all the characters in the translation table). The other characters in 
the table are as shown in the following table: 
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CHR$ 


Character 
On Screen 


Printer 
Translation 


U.K. 


U.S.A. 


France 


Germany 


Spain 


&A0 


A 


&5E 


A 


A 


A 


A 


A 


&A2 


a a 


&7B 


1 




t 


t 


■ * 


&A3 


£ 


&23 


£ 


n 


# 


# 


Pt 


&A6 


§ 


&40 


t 




1 


§ 


J- 
1 


&AE 


i 


&5D 


t 


j. 

p 


t 


.r. 

r 


i 


&AF 


i 


&5B 


t 


p 


t 


f 


i 



t For the printed character, refer to page 18 of your DMP1 instruction manual. 

The above is an extract from the default translations, which can be changed if 
required. See the Firmware manual (SOFT 946) for further details. 



Part 11: Joysticks 



The built-in software in the computer supports either one or two joysticks. These are 
treated as part of the keyboard, and as such, may be interrogated by IN KEY and 
INKEYS. 

Note that in the majority of cases, the main 'fire' button on a joystick is interpreted as 
'Fire2'bytheCPC664. 

The functions JOY (0) and JOY ( 1 ) enable direct inspection of the first and second 
joysticks repectively. The function returns a bit-significant result which indicates 
the state of the joystick switches at the last keyboard scan. 

The table below indicates the values returned by both joysticks. The JOY values are 
followed by values for use in statements which take key numbers as parameters (i.e. 
INKEYand KEY DEF). 



STATUS 


JOY COMMAND 


KEY VALUES 




BIT 


VALUE 


FIRST 


SECOND 


EQUIVALENT 


Up 


SET 


RETURNED 


JOYSTICK 


JOYSTICK 


KEY 





1 


72 


48 


'6' 


Down 


1 


2 


73 


49 


'5' 


Left 


2 


4 


74 


50 


( R' 


Right 


3 


8 


75 


51 


<rpj 


Fire 2 


4 


16 


76 


52 


'G' 


Firel 


5 


32 


77 


53 


<F' 
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Note that when key values for the SECOND joystick are returned, the computer 
cannot tell whether those values have been generated by the joystick or by the 
equivalent keyboard key (indicated in the last column of the previous table). This 
means that the keyboard can be used as a substitute for the second joystick. 



Part 12: Disc organisation 

The BIOS supports three different disc formats: SYSTEM format, DATA ONLY 
format and IBM format. Under AMSDOS, the format of a disc is automatically 
detected each time a disc with no open files is accessed. To permit this automatic 
detection, each format has unique sector numbers. 

3 inch discs are double sided, but only one side may be accessed at a time depending on 
which way round the user inserts the disc. There may be a different format on each 
side. 

Common to all formats: 

Single sided (the two sides of a 3 inch disc are treated separately). 

512 byte physical sector size. 

40 tracks numbered to 39. 

1024byteCP/Mblocksize. 

64 directory entries. 

SYSTEM format 

9 sectors per track numbered &41 to &49, 
2 reserved tracks. 

The system format is the main format supported, since CP/M can only be loaded (cold 
and warm boot) from a system format disc. The reserved tracks are used as follows: 



Track sector &41 
Track sector &42 
Track sectors &43 to &47 
Track sectors &48 to &49 
Track 1 sectors &41 to &49 



boot sector, 
configuration sector, 
unused, 

) CCPandBDOS. 



Note that VENDOR format is a special version of system format which does not 
contain any software on the two reserved tracks. It is intended for use in software 
distribution. 
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DATA ONLY format 

9 sectors per track numbered &C1 to &C9. 

reserved tracks. 

This format is intended for future enhancement. It is not recommended for use with 
CP/M since it is not possible to 'warm boot' from it. However, if only AMSDOS is to be 
used, the DATA ONLY format affords a little more disc space. 

IBM format 

8 sectors per track numbered & 1 to &8. 

1 reserved track. 

This format is logically the same as the single-sided format used by CP/M on the IBM 
PC. It is intended for specialist use and is not otherwise recommended. 



Part 13: Memory 

Memory Map 

AMSDOS < FIRMWARE < 
ROM ROM 



&FFFF 



&C000 
&BFFF 



BASIC FOREGROUND ROM < 



&???? 

HIMEM 

&4000 
&3FFF 

&6000 ; 



> SCREEN RAM 



> FIRMWARE DATA AREA 
JUMP BLOCK 

BASIC DATA AREA 
AMSDOS DATA AREA 
OTHER EXPANSION- 
ROMS' DATA AREA 

> USER DEFINED CHARACTERS 

> BASIC PROGRAM AREA 



> BASIC PROGRAM AREA 



....where address &???? is dependent upon expansion ROMs. (Note that &???? is 
&A6FC when no external expansion ROMs are fitted.) 
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Additional I/O 

Most I/O port addresses are reserved by the computer, in particular addresses below 
&7FFFshouldnotbeusedatall. 

It is intended that the part of the address AO - A7 should reflect the type of external 
I/O device, and that address lines A8 and A9 may be decoded to select registers within 
the I/O device. Of the remaining address lines, only A10 must be decoded (as low) 
whilst lines All to A15 are high. Thus each device may have registers addressed as 
&F8??, &F9??, &FA??, and &FB??, where ?? is in the range DC to DF for 
communications interfaces, and EO to FE for other user peripherals. 

Note that Z80 instructions which place the B register on the upper half of the address 

bus (A15 - A8) must be used. 



Sideways ROMs 

Provision is made for additional ROMs to be selected in place of any part of the 
on-board ROM. The address arbitration and bank selection logic will be contained in 
a module connected to the expansion bus, but all the signals required are brought to 
the expansion bus. 
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Chapter 8 

At your leisure.... 



This chapter takes a leisurely look at some background 
information to computing in general, and at the CPC664 in 
particular. It is not vital that you read this chapter before 
operating the computer, but it may help you to understand a little 
of what's going on 'under the bonnet'. 



Part 1: Generally speaking.... 

Zap the wotsit! 

Even if the only reason that you bought your CPC664 was to take advantage of the 
sophisticated computer games available, you may still probably be wondering about 
several aspects of the computer that come under the heading of 'hardware'. 

The hardware is what you can pick up and carry around, i.e. the main computer 
keyboard, the monitor, the connecting leads etc. In fact, it's just about everything 
that isn't specifically the 'software' - programs, manuals, and disc or cassette based 
information. 

Certain features of the way that the computer behaves, are produced by courtesy of 
the hardware - things like the coloured display on the TV set (or monitor). It's up to 
the software to make use of these hardware capabilities to produce specifically 
designed characters and shapes on the screen. 

The hardware actually directs the beam of electrons at the electro luminescent 
surface on the inside of the screen of the TV tube to make it 'light up' - the software 
adds order and intelligence by telling the hardware when and how to perform. It adds 
timing, control and sequencing to produce the effect of a spaceship taking off, or 
something more mundane like a letter appearing when you type at the keyboard. 

So what makes one computer better than another? 

Hardware without software is worthless. Software without hardware is equally 
worthless - the value of the computer begins when the two come together to perform 
various tasks. There are some very basic considerations that can be used to grade 
performance of both hardware and software. 
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The generally accepted reference points for personal computers are now: 



1. The screen resolution - the smallest discernible item on the 
display. 

This is a combination of factors, including the number of different colours available to 
the programmer, the number of distinctly different areas that can be resolved on the 
display (i.e. the pixels), and the number of text characters that can be displayed on a 
single screen area. 

You will find that your CPC664 compares very favourably with any similarly priced 
machine in each of these respects. 



2. The BASIC interpreter 

Virtually every home computer includes with it a BASIC interpreter that allows the 
user to start creating programs to use the hardware features. The built in 
programming language (BASIC) that comes supplied with your machine is itself a 
program - an immensely complicated and intricate program that has been evolved 
over a million man- years of experience since BASIC was 'invented' in the USA. The 
'Beginners' All-purpose Symbolic Instruction Code' is easily the most widely used 
computer language in the world, and like any language, it comes in a variety of local 
'dialects'. 

The version in the CPC664 is one of the most widely compatible dialects of BASIC, 
and will also run programs written for operation under the CP/M disc operating 
system. It is a very fast implementation of BASIC - in other words it performs its 
calculations quickly - and whilst you may not be too concerned that one computer 
may take 0.05 of a second to multiply 3 by 5 and display the answer, whereas another 
may take 0.075 second to do the same - where a program that draws graphics patterns 
on the screen may call for many thousands of simple repetitive calculations, the 
difference between 0.05 and 0.075 of a second adds up to a considerable difference in 
performance. 

You will frequently hear the term 'machine code' being used. Machine code is the raw 
form of instruction code that can be passed to the processor. It takes less time to work 
out what it's been asked to, and gets on with producing the result some 5 to 15 times 
faster than an equivalent operation being passed along through the BASIC 
interpreter. On the other hand, it can take 5 to 50 times longer to write an equivalent 
program in machine code when compared to performing the same overall task using 
BASIC. 
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The BASIC in your Amstrad computer is amongst the fastest and most fully featured 
to be found in any home computer system, and incorporates many features that help 
the experienced BASIC programmer overcome some of the inherent sluggishness of a 
'high level language' interpreter to perform surprisingly dynamic visual and musical 
effects. 



3. Expansibility 

Most computers pay attention to the need to 'add-on' additional items of hardware; 
printers, joysticks, extra disc drives. Paradoxically, some of the most successful home 
computers require the addition of add-on units known as 'expansion interfaces' before 
even a simple printer or joystick controller can be installed. 

The purchaser does not always think ahead to his needs in the future, because a 
machine that incorporates a properly supported parallel printer (Centronics 
compatible) and a games joystick port may actually be cheaper in real terms. 

The CPC664 computer features a built-in Centronics printer port, a port for an 
additional disc drive, a cassette data (+ motor control) socket, facilities for up to two 
joysticks, a stereo sound output - and a comprehensive expansion bus that can be used 
to attach serial (RS232) interlaces, MOD KM s, speech synthesisers, light pens, etc. 



4. Sound 

The sound features of a computer determine whether or not it sounds like a bluebottle 
in a empty cocoa tin -or if it can produce an acceptable representation of an electronic 
musical instrument. 

The CPC664 computer uses a 3 channel 8 octave sound generator, which can produce 
a very acceptable musical quality with full control of the amplitude and tone 
envelopes. Furthermore, the sound is divided into a stereo configuration, where one 
channel provides the left output, one channel provides the right output, and the third 
channel sits in the middle. 

This provides considerable scope for writing programs that track the sound effects 
across the screen to follow the motion of an arcade-style game. 

Ultimately, you will make up your own mind about which of these features is most 
important to you. We hope that you will try them all to make the most of your 
computer. 
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Why can't? 

With all the power of modern technology, users frequently wonder why even a 
machine as advanced as the CPC664 is apparently unable to perform tasks seen on 
any TV set. Why for instance, can't a computer animate a picture of someone walking 
across the screen in a natural fashion? - why do all computers represent movement 
with 'matchstick' figures? 

The answer is simple yet complex. The simple answer is that you must not be 
beguiled into believing that the screen of your computer has anything of the subtlety 
of the screen of a TV set. A television set operates using 'linear' information that can 
describe a virtually infinite range of resolution between the extremes of light and 
dark across all the colours of the spectrum. This process means that in computer 
terms, the display 'memory' of a full TV picture is some twenty times greater than the 
converted equivalent of a home computer display. 

That's only part of the problem, since to animate this picture requires that this 
enormous amount of memory must be processed at high speed (around 50 times each 
second). It can be done - but only by machines that cost a few thousand times more 
than a home computer, at least for the time being! 

Until the price of high speed memory falls dramatically (it will eventually), small 
computers have to make do with a relatively small amount of memory available to 
control the screen display, which results in lower resolution, and jerkier movements. 
Thoughtful hardware design and good programming can go a long way to making the 
best of this situation, but we are still a fair way from cheap computers that can 
reproduce flowing motions and lifelike pictures in the same way that even a moderate 
animated cartoon can produce. 

That keyboard looks familiar.... 

Why can't you simply walk up to the computer type a page of simple text into the 
machine? 

Don't be mislead by the fact that the computer looks like a typewriter with an 
electronic display. The screen is not a piece of electronic paper - it's a 'command 
console' - jargon which means that it simply provides you with the means of 
communicating with the programming language (and the programs) in the machine 
memory. 

Until you tell it to the contrary, the computer will try and interpret all the characters 
that you type at the keyboard as being program instructions. When you press the 
[ENTER] key, the computer will look through what has been typed, and if it doesn't 
make sense to the built in BASIC, it will reject the 'input' with the comment: 

Syntax error 
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However, it may just happen that the program presently residing in your computer is 
a Word Processor system, in which case you will be able to type random words, press 
[ENTER] and carry on typing as if the system WERE operating as an electronic piece 
of paper in an electronic typewriter. But to do this, you must have first loaded a word 
processor program into the machine's memory. 

The computer 'seems' to combine several items of equipment that have become 
familiar around the home and office such as the TV-like screen and the keyboard. 
You must remember that the similarities are generally strictly superficial, and that 
the computer is a combination of familiar looking hardware that has an entirely 
different personality of its own! 
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Whose afraid of the jargon? 

As with all 'specialist' industries, computing has developed its own jargon as a 
short- hand form of communicating complicated concepts that require many words of 
'plain language' explanation. It's not just the high technology business that's guilty 
of hiding itself behind an apparent smokescreen of 'buzz words', jargon and 
terminology - most of us have come up against the barriers to understanding erected 
by all the main professions and trades. 

A major difference is that the confusion in legal jargon arises from the way the words 
are used - rather than the words themselves as in the case of computing. Most people 
who grow familiar with computing terminology will go out of their way to use the 
words in the most straightforward possible manner, so as to minimise the complexity 
of the communication. Don't be mislead by the 'plain language' used in computing, it 
is not a literary subject, but a precise science, and apart from the 'syntax' of the 
wording, the structure of the communication is very straightforward, and not in the 
least confusing or ambiguous. Teachers of computing have not yet managed to make 
an art form out of trying to analyse the exact meaning intended by a programmer in 
his program construction. 

Having said that, despite whether or not the meaning of a computer program is 
obvious, there are still many aspects that can be analysed as either elegant or untidy, 
and more emphasis is being put on a formal approach to program construction, now 
that the initial mayhem brought about the micro revolution is settling down. 

Computing is rapidly being understood by many young people who appreciate the 
precision and simplicity of the ideas and the way they can be communicated - you 
don't find too many 10 year old lawyers - but you can find plenty of ten year old 
programmers! 
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Basics of BASIC 

Virtually all home computers provide a language known as BASIC, which allows 
programs to be written in the nearest thing to plain language presently available. 
BASIC no longer has any particular significance as to the degree of the sophistication 
of the languages, and many extremely complex and powerful programs are written 
using BASIC. 

However, there's no doubt that the name has attracted many newcomers for its 
promise of providing a starting place in the maze of computer program languages, 
and this has contributed significantly to its universality. 

BASIC is a computer language that interprets a range of permitted commands, and 
then performs operations on data while the program runs. Unlike the average human 
vocabulary of 5000-8000 words (plus all the different ways verbs can be used etc,) 
BASIC has to get by with about two hundred. Computer programs written using 
BASIC have to follow rigid rules concerning the use of these words. The syntax is 
precise, and any attempt to communicate with the computer using literal or 
colloquial expressions (i.e. plain language) will result in the cold and clinical 
message: 

Syntax error 

This is not as restrictive as it first appears, since the language of BASIC (the syntax) 
is primarily designed to manipulate numbers - the numeric data. The words are 
essentially an extension of the familiar mathematical operators +/- etc., and the 
most important concept for newcomers to grasp is the fact that a computer can only 
work with numeric data. Information that is supplied to the CPU (Central Processor 
Unit) integrated circuit is only supplied in the form of numerical data. 



Number please.... 



If a computer is used to store the complete works of Shakespeare, there will not be a 
single letter or word to be found anywhere in the system. Every piece of information 
is first converted into a number which the computer can locate and manipulate as 
required. 

BASIC interprets the words as numbers which the computer can then manipulate 
using only addition, subtraction and features from Boolean logic that permits the 
computer to compare data and select for certain attributes - in other words, check to 
see if one number is greater than or the same as another, or to perform a defined task 
if one number or another meets certain criteria. 

Through the medium of the program, the computer breaks down every task into a 
simple series of Yes/No operations. 
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If this process sounds cumbersome, then you're quite right, as you have uncovered the 
first and most important truth about computing. A computer is primarily a tool for 
performing the simplest of repetitive tasks very quickly and with absolute precision. 
Thus BASIC interprets the instructions as given in the form of the program, and 
translates them into the language that can be handled by the CPU. Only two states 
are understood by the logic of a computer - 'yes' or 'no', represented in binary notation 
as '1' and '0'. The representation in Boolean logic is simply 'true' and 'false* - there's no 
such thing as a 'maybe' or 'perhaps'! 

The process of switching between these two distinct states is the essence of the term 
'digital', and is sometimes referred to as 'toggling'. In the world of nature, most 
processes move gradually from one completely 'stable' state to another in a linear 
progression. In other words, the transition is made by following the path of a line 
between the two states - in an ideal digital environment the switch from one state to 
the next is made in no time at all -but the physics of semiconductor science dictate 
that there will be some minor delay, referred to as propagation delay - and it is the 
accumulation of many of these propagation delays that provides the reason why a 
computer has to spend some time processing the information before the answer comes 
out. 
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In any case, the computer would have to wait a finite time for one task to have 
finished before it can start work on the result of that first task - so there would need to 
be some artificial delay imposed anyway. The digital process is black or white, and 
the stages of transition via the various shades of grey have NO significance 
whatsoever. Conversely, the linear or 'analogue' progression IS via the shades of 
grey. 

If the ultimate answer is either or 1, then there is no possibility of it being 'nearly' 
correct. The fact that computers can sometimes appear to make errors when handling 
numeric data is due to the limitation of the size of numbers it can process, requiring 
'oversized' data to be squeezed down to fit the space available , or 'truncated', leading 
to roundingerrors.e.g.999,999,999 becomes 1,000,000,000. 

In a world where the only two numbers available are or 1 , how then do you count 
beyond 1? 



Bits and Bytes 



We just happen to be used to understanding numbers based on the decimal system 
where the reference point is the number 10 - i.e. there are ten digits available to 
represent quantities in range from to 9 (which is used in preference to the 
expression 1 to 10). The system where numbers range from to 1 is the binary system, 
and the units in which the system operates are called bits - an abbreviated form of 
'Binary digiT'. 

The relationship between bits and decimal notation is simple to understand: 

It's conventional to declare the maximum number of binary digits being used by 
adding leading zeros to make up the number to the full number of bits: 

e.g. decimal 7 becomes: 
00111 binary 

...,using5 bit notation. 

In the binary system, the figures may be considered merely as indicators in columns 
to specify whether or not a given power of 2 is present; l=yes, 0=no. 

2° = 1 

2 1 = 2 = 2 = 2(2°) 

2 3 = 4 = 2x2 = 2(2*) 

2 3 = 8 = 2x2x2 = 2(2 2 ) 

2 4 = 16 = 2x2x2x2 = 2(2 3 ) 
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...so the columns look like: 

2 4 2 3 2 3 2 1 



2° 



10 11 

(16 + + + 2 + 1) = 19 

In order to provide a shorthand method of referring to binary digit information, the 
term 'byte' is used to denote 8 bits of information. The maximum number that be 
stored in a byte is then (binary) 11111111 - or (decimal) 255. This implies 256 actual 
variations, including 00000000, which is still perfectly valid data to a computer. 

Computers tend to manipulate data in 8 bit multiples. 256 is not a very large number, 
so in order to achieve an acceptable means of handling the memory, two bytes are 
used to provide a method of addressing memory which is in the form of array, with a 
horizontal and vertical address by which the elements of that array can be located: 








1 


2 


3 


4 


5 


6 


7 


8 


9 

























1 






















2 






















3 






















4 






















5 








1 




1 










6 






















7 






















8 






















9 























The array can locate up to (10x10) items of information using address numbers that 
lieintherangeOto9.Theitemstoredatposition3,5isa ( r-asistheitemat5,5. 

So a binary array of 256x256 can handle 65,536 individual locations using 8 bit 
addresses for the vertical and horizontal axes of the array. So our '0' and T have 
progressed to being capable of identifying one of 65,536 different elements. 
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The next level of shorthand for binary is the kilobyte (kByte or simply 'K') which is 
1024 bytes. 1024 is the nearest binary multiple to the more familiar decimal use of 
the term 'kilo' {1000) - and explains why a computer described as having a '64K' 
memory does in fact have a memory of 65,536 bytes (64 x 1024). 

Thankfully, the BASIC interpreter does all the necessary conversions for you, and it 
is quite possible to become a proficient programmer without a complete 
understanding of binary, although an appreciation of the significance of binary will 
help you spot the many 'magic' or significant numbers that inevitably crop up as you 
work through the science of computing. 

It's worth spending some effort to acquire an understanding of binary and the various 
significant numbers 255, 1024 etc, since it is very unlikely that these will change 
from being the bedrock of computer operation in the foreseeable future. The certainty 
and simplicity that comes from working in only two states will prevail over the 
enormously increased complexity that would result from any other number base. 

However.... 

Simple and elegant as it is, binary notation is longwinded and prone to inaccuracy as 
it cannot be easily read at a glance. Binary has a number of associated counting 
systems that act as shorthand for programmers. One such number system widely 
used in microcomputing is called HEX {an abbreviation of hexadecimal). 

Here the number is based on 16 (0 to 15), and is represented in a single character: 



Decimal 

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 

Hex 

0123456789A BCD EF 



The hexadecimal system can break the eight bits of a byte into two blocks of four bits, 
since 15 is a four bit number: 1111 binary. The first block indicates the number of 
complete units of '15', and the second indicates the 'remainder' - and this is where the 
absolute elegance of binary and hex begin to emerge. 
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Reconsidering the table that introduced binary notation; 



Decimal 


Binary 


Hexadecimal 











1 


1 


1 


2 


10 


2 


3 


11 


3 


4 


100 


4 


5 


101 


5 


6 


110 


6 


7 


111 


7 


8 


1000 


8 


9 


1001 


9 


10 


1010 


A 


11 


1011 


B 


12 


1100 


C 


13 


1101 


D 


14 


1110 


E 


15 


1111 


F 


16 


10000 


10 



An 8-bit number 11010110 (&D6 hex) can be subdivided, and then considered as two 
4-bit numbers (known as nibbles). Throughout this manual, a hex based number is 
introduced by the '&' symbol e.g. &D6, and this is the number base most commonly 
used by programmers using assembly language techniques. An assembly language 
program is the nearest most programmers get to programming directly in machine 
code, since the assembly language program allows the program to use simple letter 
'mnemonics' to specify the actual machine code 'numbers'. 

When using hex, you must first work out the value of the first digit to obtain the 
number of 16's in the final number, and then add the remainder designated by the 
second 'half of the hex notation to obtain the total decimal equivalent. There's a 
powerful temptation to regard a number like &D6 as 13+6, or 136, but it's 
(13xl6)+(6) = 214. 

It's the same process you use when you read a decimal number (also known as a 
Denary number) such as '89' - i.e. (8xl0)+(9). It just happens that multiplying by ten 
is a great deal simpler, unless you've had a lot of practice at multiplying by 16. 
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If you've got this far without becoming too confused, then you are well on your way to 
getting a grasp of the basic principles of the computer. You may even be wondering 
what all the fuss is about - and you'd be quite correct. A computer is a device that 
manages very simple concepts and ideas; it just happens to perform these tasks at 
great speed (millions of times per second}, and with a huge capacity to remember both 
the data that has been input, and the intermediate results of the many thousands of 
very simple sums along the way to the result. 

If you want to pursue the theory of your computer, there are literally thousands of 
books available on the subject of computing. Some will tend to leave you more 
confused than you were when you started reading them, but a few will actually lead 
you along the way by revealing the simplicity and the fundamental' relationships 
that exist between the number systems, and the way that your computer deals with 
them. 




At your leisure,, 



Chapter 8 Page 13 



Part 2: More about the CPC664 
specifically.... 

This section gently expands upon some of the machine-specific 
aspects of the CPC664. Background information to these matters 
will be found both in the Foundation course, and in the chapter 
entitled 'Complete list of AMSTRAD CPC664 BASIC keywords'. 

Subjects covered in this section: 



if Character set 


* ASCII 


if Variables 


* Logic 


if User defined characters 


* Print formatting 


if Windows 


if Interrupts 


* Data 


if Sound 


if Graphics 


if Machine hardware 



A bit of character.... 

As you type at your CPC664 keyboard, you should not take for granted the fact that 
recognisable letters and numbers etc, appear on the screen. After all, we've already 
discussed the fact that your computer is not a typewriter. What's actually happening 
is a result of you pressing a combination of electrical switches. The electrical signals 
produced when you press these switches are translated by the circuitry inside the 
equipment to produce a pattern of dots on the screen. We recognise that pattern of 
dots as a letter, number, or other character from the CPC664's 'character set'. 



Chapter 8 Page 14 At your leisure.. 



Some of the characters that you will see are not directly accessible by pressing the 
keys on the keyboard, but are only available for display using the PRINT 
C H R $ ( < number > ) statement. This is because each element stored in the computer is 
stored in the unit of data known as the 'byte' - and as just discussed in part 1 of this 
chapter, a byte has 256 different possible combinations of value. As the computer has 
to use at least one whole byte per character stored (whether we want it to or not - it's 
the smallest denomination that the CPC664 appreciates), we might as well use all 
256 possible combinations, rather than simply be satisfied with the 96 or so 'standard 
characters' that are printed on most typewriters - and throw away the spare 160 
possibilities. 

The 'standard' range of characters is known as a 'subset'. It is classified throughout 
the computer world as the 'ASCII' display system, a term derived from 'American 
Standard Code for Information Interchange'. It's primarily a system that ensures the 
data sent from one computer to another is in a recognisable form. The chapter 
entitled 'For your reference....' lists the ASCII display range, together with the 
additional characters available on the CPC664, and the corresponding numeric 
codes. 



How we get there.... 

You are by now probably quite familiar with the program: 

10 FOR n = 32 TO 255 
20 PRINT CHR$<n); 
30 NEXT 

....which makes the computer display the character set on the screen. Let's now 
examine the essence of this small program: 

The first point to notice is that the computer has not been instructed to PRINT 

"abcdefghij klmn etc"; instead it has been asked to PRINT CHR$(n). n 

just happens to be a convenient shorthand note for a 'variable'. A variable is an item 
of computer information that 'varies' according to the instructions given in the 
program. (The choice of the letter n for the variable is arbitrary - it can be any 
letter(s) as long as it's not a keyword.) 

How can you tell what is a variable?.... 

A number like 5 is fixed, it occurs between the numbers 4 and 6 - thus it is not a 
variable. The character n is also fixed - it's a letter from the alphabet. 
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So how did the computer know the difference? If the letter n had been declared to be 
the alphabetical character, we would have typed n in quotation marks, i.e. " n " , and 
the computer would have responded with the message Syntax error- because 
it does not understand the command sequence FOR "n" = 32 TO 255. 

Simply by using n without quotation marks, we have told the computer that n is a 
variable. The definition of the FOR statement in BASIC requires that it should be 
followed by a variable - so the computer assumes that whatever follows FOR is just 
that. 

We have also told the computer that n = 3 2 TO 255. Thus we have declared the 
range of the variable. It is in effect, a sequence starting at 3 2 , finishing at 2 5 5 . 

Having declared this variable, we should then instruct the computer what it should 
do with it - line 2 does just that: 

20 PRINT CHR$Cn); 

This specifies that whatever the current numeric value of n, the computer should 
look into its memory to see which character number corresponds to that value, and 
print the character on the screen. 

The semicolon at the end of the line instructs the computer to prevent a carriage 
return and line feed. (Otherwise each new character will be printed in the first 
column of a new line.) 

Line 3 tells the computer that after it has performed the task with the first value of 
n in the sequence (which is 3 2), it should return to the line where the F R is located, 
and do the same again with the NEXT value that it assigns to the variable n . This 
process is known as 'looping', and is one of the most vital and fundamental aspects of 
computer programming and operation. It saves typing long repetitious sequences 
manually, and you will quickly come to use it in your own programming. 

When this FOR NEXT loop reaches the limit of its declared range (255), the 
operation ceases and the computer then looks for the next line after line 30 - but 
there isn't one, so it simply ends, and returns to direct mode, displaying the Ready 
prompt. This tells you that the computer is ready to accept further instructions - or 
you can enter RUN again and repeat the execution of the program. The program is 
safely stored away in the memory and will remain there until you tell the computer 
otherwise - or turn the power off. 

This program neatly illustrates a fundamental point about computing - i.e. 
everything the computer does is related to numbers. The computer has displayed the 
alphabet - and a whole range of other characters - using a number as its reference to 
the character required. When you type the key marked A, you don't ask the computer 
to type an A on the screen, but you tell the computer to look into the part of its memory 
that contains the numeric information to display the letter A on the screen. The 
actual location of this data is defined by the numeric code that is activated by the 
action of typing at the keyboard. 
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(Each character has a corresponding number, and these are listed in part 3 of the 
chapter entitled 'For your reference. . . .' . ) 

Similarly the displayed character has nothing to do with 'writing' the letter on the 
screen; once again it's all about numbers. 

For example, the ASCII code for the letter A is 97. The computer doesn't understand 
97 either (awkward blighter, eh?), and this number has to be translated from the 
human decimal code into a code that computer can relate to - it's generally referred to 
as 'machine code', and the principles underlying this aspect of the machine are 
discussed earlier in this chapter. 

At first, the translation from the decimal number notation we are used to in everyday 
life, to the 'hexadecimal' notation of the computer will seem heavy going. Thinking of 
numbers that are based on the ten unit is so natural, that to do otherwise is like 
trying to eat with your knife and fork in the opposite hands. 

A degree of mental dexterity must be acquired to understand hex notation, but once 
you do, many things about computing will fall into place and the elegant structure of 
the numbering system will become apparent. 

If you are unsure about the binary and hexadecimal numbering systems, we suggest 
that you thoroughly read part 1 of this chapter (if you have not already done so). 

Once the computer has translated the pressing of the A key into the type of number it 
understands, it looks into that part of the memory indicated, and the result is another 
series of numbers that define the character. Hence the character that you see 
displayed on your screen, is built up from a block of data, stored in the memory as a 
numeric 'matrix': 



mm 

JUU" 



i mn m i 




A BLANK CHARACTER 

MATRIX (GRID) 



LOWER CASE a 



UPPER CASE A 



The elements of the matrix are rows and columns of dots. The character is displayed 
by turning the required sequence of dots on or off - each dot is determined by data 
stored in the computer's memory. There are 8 rows and 8 columns in each character 
matrix or 'cell' on the CPC664 display, and if you don't find a character you want out 
of the set of 2 5 5 that are provided, then you can re-define your own characters using 
the keyword SYMBOL described later in this section. 



At your leisure. 
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These 'user defined characters' can be made up using any combination of to 64 dots, 
arranged in any order - so the 'complete' character set that uses all possible 
combinations of this matrix would comprise many more different characters. Add to 
this the fact that you can group blocks of characters together to form larger block 
characters, and the possibilities for user-defined graphics are limited only by your 
time and ingenuity. 

Logic... 

A major difference between a calculator and computer is the computer's ability to 
handle logical operations in applications like the conditional IF THEN sequence. 
To do this, the logical operators treat the values to which they are applied as bit 
patterns (bit-wise), and operate on the individual bits. The description and use is 
entirely, well ...,er logical - but it is notoriously difficult to describe logic in simple 
terms without the precision of concise definitions. 

The two halves of the logical expression are known as the arguments. A logical 

expression comprises: 

<argument>[<logicaloperator><argument>] 

where: 

<argument' is: NOT <argument> 

or: < numeric expression* 
or: -relational expression* 

or: (<logical expression*) 

Both the arguments for a logical operator are forced to integer representation, and 
E R Ror 6 results if an argument will not fit into the integer range. 

The logical operators, in order of precedence, and their effect on each bit are : 

AND Result is unless both argument bits are 1 

R Result is 1 unless both argument bits are 

X R Result is 1 unless both argument bits are the same 

A N D is the most commonly employed logical operator, and does NOT mean 'add'. 

PRINT 10 AND 10 
Results in 10 

PRINT 10 AND 12 
Results in 8. 
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PRINT 10 AND 1000 

Results in 8 again. 

This is because the numbers 1 and 1000 have been converted to their binary 
representations: 

1010 
1111101000 

The AND operation checks each corresponding bit at a time, and where the bit in the 
top AND the bottom row is the 1 , the answer is 1 : 

0000001000 

...which is our result of 8. The logical operator AND is used to detect when two 
conditions are present simultaneously. Here's a self explanatory application: 

10 INPUT "The number of the day";day 

20 INPUT "The number of the month";month 

30 IF day=25 AND month=12 THEN 50 

40 CLS:G0T0 10 

50 PRINT "Merry Christmas!" 

R works on bits as well, where the result is 1 unless both bits from the arguments 
are , in which case the result is 0. Using the same numbers as for the AND example: 

PRINT 1000 OR 10 
1002 

Bit- wise: 

1010 
1111101000 

Resulting in the answer: 

1111101010 

And in a program example: 

10 CLS 

20 INPUT "The number of the month";month 

30 IF month=12 OR month=1 OR month=2 THEN 50 

40 GOTO 10 

50 PRINT "It must be winter!" 
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The NOT operator inverts each bit in the argument (0 becomes 1, and vice versa): 

10 CLS 

20 INPUT "The number of the month";mont h 

30 IF N0T(month=6 OR month=7 OR month=8) THEN 50 

40 GOTO 10 

50 PRINT "It can't be summer!" 

Another major feature to consider is the fact that you can add together any number of 
logical conditions (up to the maximum line length) to distill the facts yet further. 

10 INPUT "The number of the day";day 
20 INPUT "The number of the month"; month 
30 IF N0T(ntonth = 12 OR month = 1) AND day = 29 THEN 50 
40 CLS:G0T0 10 

50 PRINT "This is neither December nor January, but 
this might be a Leap year" 

The result of a relational expression is either - 1 or . The bit representation for - 1 
is all bits of the integer = 1; for all bits of the integer = 0. The result of a logical 
operation on two such arguments will yield either - 1 for True, or for False. 

Check this by adding lines 60 and to the above program: 

60 PRINT N0T(month=12 OR month=1) 
70 PRINT (month=12 OR month=1) 

....and when the program is r u n, entering 2 9 for the day and, say, 2 for the month 
will produce the answer in line 50, and the actual values returned by the logical 
expressions in lines 6 and 70. 

Finally, XOR (exclusive OR) produces a true result as long as both arguments are 

different. 

The following summarises all these features in what's known as a 'truth table'. It's a 
convenient way of illustrating what happens in a bit- wise logical operation. 

Argument A 1010 
Argument B 0110 

AND result 0010 
OR result 1110 

XOR result 1100 
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User defined characters 

One of the first applications of binary numbers that you are likely to come across will 
be when designing characters for use with the SYMBOL command. If the character is 
drawn on an 8 by 8 grid then each of the eight rows can be converted to a binary 
number by putting a 1 for each pixel that is to be inked and a zero for each that should 
be invisible, i.e. set to the paper colour. These eight numbers are then passed to the 
SYMBOL command. For example, to define a house character: 

* = 00001000 = &08 = 8=8 

**** = 00111100 = &3C = 32+16+8+4 = 60 

* * = 01000010 = 842 = 64 } & = 66 

* * * * = 10100101 = SA5 = 128 +32 +4 +1 = 165 

* * = 10000001 = &81 = 128 +1 = 129 
*****= 10110101 = &B5 = 128 +32+16 +4 +1 = 181 

* ** * = 10110001 = &B1 = 128 +32+16 +1 = 177 
******** = 11111111 = &FF = 128+64+32+16+8+4+2+1 = 255 

....the command is: 

SYMBOL 240,8,60,66,165,129,181,177,255 
....or.... 

SYMBOL 240,808,&3C,842,&A5,881,8B5,8B1,8FF 

....or.... 

SYMBOL 240,8X00001000, &X00111100, 8X01000010, &X10100101, 
SX10000001, 8X10110101, 8X10110001, 8X11111111 

To print the user defined character, you would type: 

PRINT CHRSC240) 

Finally, to group blocks of characters together, you may for example specify: 

semi $=CHR$ (240) + CHRS (240) 
PRINT senti$ 

....or.... 

terrace$=STRING$( 15,240) 
PRINT terraceS 

Printing press.... 

PRINT is one of the first ever commands that you use when you start to learn 
computing. It's one of those BASIC commands that does what it says really.... or does 
it? In fact there's a lot more to PRINT than at first it seems, for instance WHERE 
should it print? and HOW should it print? .... 
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Print formatting 

The PRINT command has several ways in which it can be used. The simplest is to 
follow it by an item to be printed. This item can be a number, a string or a variable 
name. 

PRINT 3 
3 



PRINT "heUo" 

he L Lo < 

a = 5 i 

PRINT a 

5 ' 

a$="test" 
PRINT a$ 
test 

Several items may be placed in one P R I N T statement with each being separated by 
a separator, or TAB or S P C . The possible separators are either a semicolon or a 
comma. The semicolon causes direct continuation of printing, while a comma forces 
printing to continue in the next zone. The initial zone width is 13, but may be changed 
using the Z N E command. 

PRINT 3;-4;5 
3 -4 5 

PRINT "hello ";"there" 
he L Lo there 

PRINT "hello", "there" 
hello there 

PRINT 3,-4,5 
3 -4 5 

ZONE 4 

PRINT 3,-4,5 
3 -4 5 

A point to note here is the fact that positive numbers are printed with a leading space, 
while negative numbers have a leading minus sign. All numbers have a trailing 
space. Strings are printed exactly how they appear between the quotes. 
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The function S P C takes a numeric expression as a parameter, and will print as many 
spaces as are specified by the expression. If the value is negative then zero is 
assumed, if it is greater than the current stream (window) width, then the stream 
width is assumed. 

PRINT SPC(5)"hi" 
hi 

x = 3 

PRINT SPC(x*3)"hi" 

hi 

T A B is very similar except that it will print as many spaces as are needed so that the 
item to be printed will appear in the specified column. 

The stream in which all printed output will appear is window unless a stream 
director (#) is included before the list of items to be printed. Other streams may be 
used to output to the other windows. Streams 8 and 9 are special cases - anything 
printed on stream 8 will appear on the printer (if connected). Stream 9 directs output 
to a disc (or cassette) file. Note however, that the WRITE command should be used 
instead of P R I N T for this purpose. 

PRINT "hello" 

hello - window 

PRINT #0, "hello" 

hello - also window 

PRINT #4, "hello" 

hello - window 4 

(At the top of the screen) 

PRINT #8, "hello" 

hello - on the printer 

(If connected) 

TAB and S P C are fine for simple print formats, but to specify a more detailed format, 
the PRINT USING command, together with a suitable format template can be 
used. A format template consists of a string expression containing special characters, 
each of which will specify a particular type of format. These characters, called 
format field specifiers', are detailed in the description of the keyword 
PRINT USING, earlier in this manual. Some of the following examples however, 
may make their use a little clearer. 

Firstly, here are the formats available for the printing of strings: 
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" \ \ " will print as many characters from a given string, as there are spaces + 

backslashes in the template. 

PRINT USING "\ \";"test string" 
test s 



" ! " can be used to print the first character of a string. 

PRINT USING "!";"test string" 
t 

U ....But probably the most useful string format is "8". This can be used tooverride the 

] | string wrapping feature of BASIC if required. By default, BASIC will start the 

I printing of any string on a new line if it is too long to fit onto the current line. PRINT 

* USING "8"; can be used to override this. 

(Use BORDER0,so that you can see the edges of the paper.) 

MODE 1:L0CATE 39,1:PRINT "too Long" 

- line 1 
too Long - line 2 

MODE 1:L0CATE 39,1:PRINT USING "8";"too Long" 

to - line 1 

o Long . H ne 2 

A large number of templates are available for the printing of numbers. Probably the 
simplest is PRINT USING "#####", one digit is printed for each "#" that 

appears in the template. 

PRINT USING "######■'; 123 

123 

The position ofthe decimal point may be included by the use of " . " 

PRINT USING "tttttift. #####";12. 45 
12.45000 

The digits before the decimal point may be grouped into threes, separated by commas 
if" y " is included in the template before the decimal point. 

PRINT USING "########, .####";123456. 78 
123,456.7800 
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Floating dollar and pound signs may be included in the format - i.e. a currency sign 
that will always be printed directly before the first digit of the number, even if it does 
not fill the complete format. This is achieved by the use of " $ $ " and " £ £ " in the 

template. 

PRINT USING "$$##";7 
$7 

PRINT USING "$$##";351 
$351 

PRINT USING "££####,. ##"; 1 234 . 567 
£1,234.57 

Note the rounding of the result. 

The space before the result may be padded with floating asterisks by the use of " * * " 
in the template. 

PRINT USING "**####. #";12. 22 
****1 2 . 2 

This may be combined with the currency symbols, (and then only one currency 
symbol is used) -i.e. " **$. ...etc" or "**£.. ..etc". 

A " + " at the start of the template specifies to always print the sign of the result 
before the first digit. A " + " at the end of the template prints a trailing sign. 

A " - " can only be placed at the end of the format, and specifies that a trailing minus 
sign be printed if the number is negative. 

PRINT USING "+##";12 
+ 12 

PRINT USING "+##";-12 
-12 

PRINT USING "tf#+";12 
12 + 

PRINT USING "##-";-12 
12- 

PRINT USING "##-";12 
12 
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A" I t t t "format template can be used to print a number in exponential format 

PRINT USING "###.##T T I t";123.45 
1 2 . 35E+01 

When using print formats for numbers, note that if a number is too long for the 
specified template, then a % symbol is printed before the result.to indicate that this 
has happened, and the result is NOT shortened to fit the specified template. 

PRINT USING "####"; 123456 

2123456 



Want your windows done?.... w fr+.a*r j i - -;; 

The BASIC of the CPC664 provides a comprehensive method for setting up a 
maximum of eight text windows. Any of the text screen driving commands may then 
be directed to any one of these windows. f^o '/ritZ 

The command that is used to set up a window is, simply enough: WINDOW. This is 
followed by 5 values. The first is optional and is used to specify which window is to be 
defined - if omitted, then window zero is assumed, all the normal BASIC prompts and 
messages (for example, 'Ready') are produced in window zero. The hash symbol (#) 
precedes this number to identify it as being a stream director, The next four numbers 
specify the left, right, top and bottom limits of the window. These values are column 
and row numbers, so they must lie in the range 1 to 80 for left/right and 1 to 25 for 
top/bottom. 

The following example will define WINDOW (stream) number 4 to start in column 7 
(left) and go on to column 31 (right), and to start at row 6 (top) and go down to line 1 8 
(bottom). Reset the computer then type : 

WINDOW #4,7,31,6,18 

Nothing will appear to have happened after this command, however, try typing the 

following : 

INK 3,9 

PAPER #4,3 
CLS #4 

This will cause a large green rectangle to appear on the screen, and this is window 
number 4. The above also shows that PAPER and CLS may be used with any one of 
the eight windows by the inclusion of a stream director; its omission causes the 
command to operate on window - the default window. 
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Each of the following commands may include a stream director to identify the 
W I N W in which the command is to be carri ed out . 

CLS a 

COPYCHRS 

INPUT ^ 

LINE INPUT ■■■ . f ■' 

LIST , r , J 

LOCATE ;> 

PAPER ''' 

PEN 

POS 

PRINT 

TAG 

TAGOFF 

VPOS 

WINDOW 

WRITE 

The new green window which you have put on the screen, will have obscured some of 
the previous text (written on window number 0). 

Text may be directed to any window by including a stream director in a PRINT 
statement: 

PRINT n/'heLLo there" 

These words will appear at the top of the green rectangle, rather than on the 
following line as would have happened if... 

PRINT "heUo there" 

....had been used. While typing in the earlier command, you will have noticed that 
part of the green window was overwritten by the text. 

If you want all the normal BASIC messages to appear in window 4, then it can be 
swapped with the default window ( 0) by use of the WINDOW SWAP command : 

WINDOW SWAP 0,4 

The 'Ready' that follows this command will be printed in the green window. The 
cursor will be positioned directly beneath it. Now try typing the following: 

PRINT #4, "hello there" 
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....and the words 'hello there' will appear directly beneath the WINDOW SWAP 
command in the old window 0, which is now window 4. It may also be apparent from 
this, that the current print position in each window is stored, so that even after a 
WINDOW SWAP, text is printed part way down the new stream 4 rather than 
starting at the top, Try the following: 

LOCATE #4,20,1 

PRINT "this is window 0" 

PRINT #4, "this is window 4" 

The ( wi ndow 0' message will appear on the line after the PRINT, while the 
' w i n d o w 4' message will appear at the middle of the top line of the whole screen. 

Before a WINDOW command has been issued, all eight windows cover the entire 
screen. This is also true after a M D E command has been issued - so, if after using 
windows you find that the cursor ends up in a very small window, just type in 
MODE 1 , as shown: 

MODE 1 

WINDOW 20,21,7,18 

HO 

DE 
1 

Don't worry about the word 'MODE' being split up - it will still work, and don't forget 
to leave a space between MODE and 1 . 

Now that you know a little about the way in which windows operate - try typing in the 
following short program : 

10 MODE 

20 FOR n=0 TO 7 

30 WINDOW #n,n+1,n+6,n+1,n+6 

40 PAPER #n,n+4 

50 CLS #n 

60 FOR c=1 TO 200:NEXT c 

70 NEXT n 

This sets up 8 overlapping windows and clears each to a different paper colour. When 
the program has finished running and 'Ready' appears, try pressing [ENTER] a few 
times to see how the scrolling of window affects the coloured blocks on the screen. 
However, although these coloured blocks may be scrolling, the locations of the other 
windows do not actually move. Try the following: 

CLS #4 
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. ...and you will see that the 4th window is still in the same position - the new coloured 
block having obscured those beneath it as one would expect. As a matter of interest, 
observe the differences when you type: 

LIST 
LIST #4 
LIST #3 

A further feature of the W I N D W command, demonstrated by the final program in 
this section, is that it does not matter if you specify the left and right window 
dimensions in reverse order. This means that if the value of the first parameter is 
greater than the second, BASIC will automatically sort the dimensions into the 
correct order. This also applies to the top and bottom window dimensions. 

10 MODE 

20 a=1+RND*19:b=1+RND*19 

30 c=1+RND*24:d=1+RND*24 

40 e=RND*15 

50 WINDOW a,b,c,d 

60 PAPER e:CLS 

70 GOTO 20 



If I may interrupt.... 

If you haven't already noticed, a major innovation in the software of the CPC664 is its 
unique ability to handle interrupts from BASIC - which means that AMSTRAD 
BASIC is capable of performing a number of simultaneous but separate operations 
within a program. Such a facility is sometimes referred to as 'multi -tasking', and it is 
implemented by the application of the commands AFTER and EVERY. 

This facility is also clearly demonstrated in the way in which sound may be handled 
through facilities such as queues and rendezvous. 

Every aspect of timing is referred to the master system clock, which is a quartz 
controlled timing system within the computer that looks after the timing and 
synchronisation of events that happen in the computer - things like the scanning of 
the display and clocking the processor. Where a function in the hardware is related to 
time, this can be traced back to the quartz master clock. 

The software implementation is the A F T E R and EVERY command, which in keeping 
with the user-friendly approach of AMSTRAD BASIC, do precisely what they say; i.e. 
AFTER the time that you have preset in the command, the program will divert to the 
designated sub-routine and perform the task defined therein. 
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The CPC664 maintains a real time clock. The AFTER command allows a BASIC 
program to arrange for sub-routines to be called at some time in the future. Four 
delay timers are available, each of which may have a sub- routine associated with it. 

When the time specified has passed, the sub-routine is called automatically, just as if 
a GO SUB had been issued at the current position in the program. When the 
sub-routine finishes, using a normal RETURN command, the main program 
continues running where it was interrupted. 

The EVERY command allows a BASIC program to arrange for sub-routines to be 
repeatedly called at regular intervals. Once again, four delay timers are available, 

and each may have a sub-routine associated with it. 

The timers have different interrupt priorities. Timer 3 has the highest priority and 
timer the lowest (see the chapter entitled 'For your reference....'). 

10 MODE 1 :n=14:x=RND*400 

20 AFTER x,3:G0SUB 80 

30 EVERY 25,2 GOSUB 160 

40 EVERY 10,1 GOSUB 170 

50 PRINT "test your reflexes" 

60 PRINT "press the space bar."; 

70 IF fLag=1 THEN END ELSE 70 

80 z=RERAIN<2) 

90 IF INKEY<47)=-1 THEN 110 

100 SOUND 1,900:PRINT "cheat !" :G0T0 150 

110 SOUND 129,20:PRINT "NOW" : t=TIME 

120 IF INKEY(47)=-1 THEN 120 

130 PRINT "you took"; 

140 PRINT CTIME-t)/300;"seconds" 

150 CLEAR INPUT:f Lag=1 :R£TURN 

160 SOUND 1,0,50:PRINT ".";:RETURN 

170 n = n+1:IF n>26 THEN n = K 

180 INK 1,n:RETURN 

AFTER and EVERY commands may be issued at any time, resetting the sub-routine 
and time associated with the given delay timer. The delay timers are shared by the 
AFTER and EVERY commands, so an A F T E R overrides any previous E V E R Y for the 
given timer, and vice versa. 

The D I and E I commands disable and enable timer interrupts whilst the commands 
between them are executed. This has the effect of delaying a higher priority interrupt 
from ever occurring during the processing of a lower priority interrupt. The REMAIN 
function disables, and returns the remaining count for one of the four delay timers. 
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Using data.... 

In a program that always requires the same set of information to be input at the start, 
it would make more sense if there were some way of entering all the values without 
having to ask the user to type them in every time. This facility is provided by the 
READ and D A T A commands. The word READ is very similar to INPUT in that it can 
be used to assign values to variables. It differs, however, in the fact that values are 
read from DATA statements, rather than prompting for input from the keyboard. The 
following two examples show this: 

10 INPUT "enter 3 numbers separated by commas"; a,b, c 

20 PRINT "the numbers are"; a; "and"; b; "and"; c 

run 

10 READ a,b,c 

20 PRINT "the numbers are"; a; "and"; b; "and"; c 

30 DATA 12,14,21 

run 

In the same way that different items in an INPUT statement are separated by 
commas, so it is with items in a D A T A statement. 

In addition to numeric values, constant strings may also be held in D A T A statements: 

10 DIM a$C8) 

20 FOR i=0 TO 8 

30 READ a$(i> 

40 NEXT 

50 FOR i=0 TO 8 

60 PRINT a$(i);" "; 

70 NEXT 

80 DATA The, quick, brown, fox, jumps, over,the, Lazy, dog 
run 

You may notice that although the DATA contains strings, the strings are not 
enclosed by double quotes "". The use of double quotes in DATA statements to 
delimit (separate) strings is optional, just as they are when typing a string in answer 
to an I N P U T statement. One occasion that double quotes are useful however, is when 
the string DATA itself contains commas. If strings are not delimited by double quotes 
under these circumstances, the READ statement will use the commas to delimit the 
strings in the DATA statement. 
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10 READ a$ 

20 WHILE a$<>"*" 

30 PRINT a$ 

40 READ a$ 

50 WEND 

60 DATA The old, desolate, battered house creaked in 

the wi nd 
70 DATA "The tall, slim, dark man coughed loudly." 
80 DATA * 
run 

The string in line 60 contains commas, so each part will be READ and printed 
separately. The string in line 70 however, is delimited by double quotes and will be 
printed as a whole, as intended. 

The above example illustrates the fact that data can be spread over a number of lines. 
READ will work down the lines in number order (6 0, 7 , 8 0, etc.). Another fact that 
may not be obvious is that DATA statements can be placed anywhere within a 
program; before or after the READ statement thatpicks up the information. 

If a program contains more than one READ statement, then the second READ will 
continue from the point at which the first READ stops: 

10 DATA 123, 456, 789, 321, 654, 2343 
20 FOR i=1 to 5 

30 READ nutn 

40 tota l = tota l + num 

50 NEXT 

60 READ totaL2 

70 IF total=total2 THEN PRINT "the data is ok" 

ELSE PRINT "there is an error in the data" 
run 

Try editing line 1 so that one of the first 5 numbers is wrong, then run the program 
again. This technique of adding an extra value to the end of D A T A statements which 
is the sum of all the other values, is a good method of detecting errors in DATA, 
especially if there are a large number of D A T A lines - this is known as a 'checksum'. 

If a program requires mixed data (strings and numbers), it is permissible to combine 
string and numeric items in READ and DATA statements, as long as the items are 
read correctly. For instance, if the DATA contained sequences of two numbers 
followed by a string - then it would only make sense to use a R E A D that was followed 
by two numeric variables, then a string variable: 
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10 DIM a(5),b<5),s$<5) 

20 FOR i=1 TO 5 

30 READ a(i),b(i),s$(i ) 

40 NEXT 

50 DATA 1 ,7,f red, 3, 9, j im,2,2,eri c ,4, 6, peter, 9, 1 ,atf onzo 

60 FOR i=1 TO 5 

70 PRINT s$(i),":";a<i)*b(i) 

80 NEXT 

Alternatively, you may wish to separate the different types of data: 

10 DIM a(5),b(5),s$(5) 
... 20 FOR i=1 TO 5 
30 READ a<i) ,b(i > 
40 NEXT 

50 FOR i=1 TO 5 
60 READ sSCi) 
70 NEXT 

80 DATA 1,7,3,9,2,2,4,6,9,1 
90 DATA f red, jim, eric, peter, a If onzo 
100 FOR i=1 TO 5 
110 PRINT s$<i), M :";a(i>*b(i> 
120 NEXT 

If the FOR loop in line 2 is now changed to: 

20 FOR i=1 TO 4 

....then the first two attempts to read strings in line 6 will produce '9' then ' 1 '. These 
values are of course valid strings, but the result is not exactly what was planned! One 
method by which the program could be forced to work properly, would be to include 
the following commands: 

15 RESTORE 80 
45 RESTORE 90 

The RESTORE statement will move the DATA-reading 'pointer' to the line specified, 
and can therefore be used in a conditional statement to pick a certain block of data to 
be read depending upon some criterion. For instance, in a multi-level game which has 
a number of different screens, the E> A T A for each screen may be picked according to 
some variable - for example ' L e v e L '. The following is just an example section of such 
a program: 
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1000 REM section to draw the screen 

1010 IF LeveL=1 THEN RESTORE 2010 

1020 IF LeveL=2 THEN RESTORE 2510 

1030 IF level=3 THEN RESTORE 3010 

1040 FOR y=1 TO 25 

1050 FOR x=1 TO 40 

1060 READ char 

1070 LOCATE x,y: PRINT CHR$(char); 

1080 NEXT x,y 

2000 REM DATA for screen 1 

2010 DATA 200,190,244,244,210 etc. 

2500 REM DATA for screen 2 

2510 DATA 100,103,245,243,251 etc. 

3000 REM DATA for screen 3 

3010 DATA 190,191,192,193,194 etc. 

Another example use of DATA, READ and RESTORE might be in a program that 
plays a tune. Tone period values may be READ from DATA statements, and 
RESTORE used to make a section repeat by moving the pointer back to the beginning 
of a eertain part of the music data: 

10 FOR i=1 TO 3 

20 RESTORE 100 

30 READ note 

40 WHILE note<>-1 

50 SOUND 1, note, 35 

60 READ note 

70 WEND 

80 NEXT 

90 SOUND 1,142,100 

100 DATA 95,95,142,127,119,106 

110 DATA 95,95,119,95,95,119,95 

120 DATA 95,142,119,142,179,119 

130 DATA 142,142,106,119,127,-1 

run 
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The sound of music... 

Of all the CPC664's features, the sound and envelope commands will probably seem 
to be the most daunting at first sight - this needn't be the case. With a little practice 
you should be able to make a whole range of different noises and even make the 
machine play a complete tune with harmonies. 

Let's start by having a look at the first 4 parts of a SOUND command. These are: 
channel number, tone period, duration of note, and volume. You may be wondering 
what range each number has to be in. 

We'll leave the first part (channel number) for a moment because it is quite 
complicated. The second part (tone period) can take any whole number value from 
to 4095, but only some of these will actually produce recognisable notes from the 
musical scale - these are listed in part 5 of the chapter entitled 'For your reference. ...'. 
For instance the number 478 will play middle C, and 506 will play the note B below 
middle C, the values 479-505 will play a tone, but not one that corresponds to the 
piano scale. If the tone period is zero then no tone will be played - this will be useful 
when using 'noise' (explained later). 

The third part of the SOUND command gives the duration of the note in units of a 
hundredth of a second. The value can generally be anywhere in the range 1 to 32767. 
However, if the value is zero, then the length of the note will be determined by the 
'envelope' used (more of this later). If the value is negative then it indicates how many 
times the envelope should be played, so -3 would mean 'repeat the volume envelope 
three times' (again, this will be explained later). 

The fourth part ofthe command is the volume. This can be from to 15 (but if it is 
omitted, 12 is assumed). With the simple sounds that have been made so far, the 
volume remained constant for the whole time that the note played. When a 'volume 
envelope' is used to vary it, then the volume part ofthe SOUND command is taken as 
the starting value ofthe note. 

Now for the channel number part ofthe command. You might as well know now that 
this is a "bit significant' number - so you'll need to know a little about binary numbers 
to fully understand it (see part 1 of this chapter). 

A sound can be played on one of three possible channels, if the computer is connected 
to a stereo amplifier, then one channel will be on the left, another on the right and the 
third on both (in the middle). To choose which channel(s) that a note should be played 
on, the following numbers are used: 

1 channel A 

2 channel B 
4 channel C 
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To play on more than one channel, add up the numbers for the desired channels. For 
exampletoplayon AandCuse 1+4 = 5. 

SOUND 5,284 

You may be wondering why channel C is given the number 4 and not 3 as you might 
expect. This is because each of these numbers is a power of two (1=2 j 0, 2=2 f 1, 
4=2 f 2) so that they combine to form a binary number. If you think about a three 
digit binary number, then each of the three digits can be either or 1, and this is used 
in the channel number to indicate whether the corresponding channel should be on or 
off. From the above example: 

5 in decimal is equivalent to 1 * 4 + * 2 + 1 * 1 or 101 in binary. It follows then, that 
if each column of this binary number is labelled C, B, and A, this gives: 

C B A 
1 1 

In other words, channel C is ON, B is OFF, and A is ON. If the note was to be played on 
channels A and B, then this would become: 

C B A 

1 1 

And the binary number Oil is the same as 0*4+ 1*2 + 1*1 = 3. So the SOUND 
command would be: 

SOUND 3,248 

This is, of course, the same value that would be found if you just added up the 
numbers for the channels to play on (remember A=l, B=2, C=4). So to play on A and 
B, the channel number is given by 1 +2 = 3. 

If you didn't understand that - don't worry. As long as you can see that a combination 
of channels can be chosen by adding up the numbers for each of the channels to be 
used, then that's all you really need to know. 

Unfortunately, there are yet more values that can be used in the channel number. 
The numbers 8, 16 and 32 are used to specify that the sound should 'rendezvous' with 
another channel ( A, B, C respectively). You're probably wondering what is meant by 
the term rendezvous. Well, up to now the sounds that we have produced have gone 

straight to the specified channels. Try this: 

SOUND 1,248,2000 
SOUND 1,90,200 



Chapter 8 Page 36 At your leisure,, 



Unless you are a very slow typist, you will have noticed that you were able to type in 
the second of these commands before the first had finished. This is because the sound 
system is able to hold up to 5 sound commands for each channel in a 'queue'. If we 
wanted a sound to play on channel A, and then two sounds to play simultaneously on 
A and B, we would need some way of letting the computer know that the sound on B 
should not start until the second note on A was ready to play - i.e. making one channel 
wait for another. This is known as a rendezvous, and there are two ways in which this 
can be achieved: 

SOUND 1,200,1000 
SOUND 3,90,200 

In this, the second note is directed to A and B, so it cannot start until the note on A 
finishes. The limitation with using this method (to make a note combination wait 
until all channels that it should play on are free) is that the same sound will be 
directed to each of the channels (in this case ,90,200 went to both A and B). The 
alternative method is to use the following: 



SOUND 1,200,21 
SOUND 1+16,90,200 
SOUND 2+8,140,400 

Here, the second note on A is made to rendezvous with the sound on B (and the sound 
on B is made to rendezvous with the note on A). The advantage here is clear 
- although the second note on A was different to the note on B, the two were still 
linked so that neither could start until both channels were free - this is a rendezvous. 
Once again the values are bit-significant: 

8 = 2 | 3, 16 = 2 | 4, and 32 = 2 | 5 

....so now the channel number can be seen as abinary number where the columns are 
headed: 

Rendezvous Rendezvous Rendezvous Play on 
C B AC 

Add 32 Add 16 Add 8 Add 4 

So for a note to play on C and rendezvous with A, you would use: 

110 

This is the binary number 1 100, which is equal to 8 + 4 = 12 

Hence, a channel number of 12 would tell the computer to play a note on channel C, 
and wait for a note that has been marked to rendezvous with it on channel A. 
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Play on 


Play on 


B 


A 


Add 2 


Addl 



If 64 (2 | 6) is added to the channel number, then this indicates that the note should 
be held. In effect, this means that the note will not play until the command 
RELEASE is used. 

And finally, if 128 (2 | 7) is added to the number, then the queue of the channel 
specified will be cleared (or flushed). Therefore, if you start a sound that is going to 
continue for too long on a particular channel, then a quick way to stop it is to flush the 
channel: 

SOUND 1,248,30000 (this would play for 5 minutes) 

SOUND 1 + 128,0 (this will stop it short) 

In direct command mode, a quicker way of stopping any long sounds is to press the 
[DEL] key at the start of a line; the short warning beep flushes all sound channels. 

Now that we can hopefully send a sound to any of the three channels that we choose, 
(with rendezvous if necessary), it would be nice to be able to produce a little more than 
the rather unmelodious 'beep' that the simple SOUND command produces. The way 
to do this is to play the sound with an envelope - a pattern that defines how the note 
gets louder and quieter during the short time it is playing. A note produced by an 
instrument has an initial attack, where the volume rises very sharply. The volume of 
the note then falls away to a lower level which is sustained for a time, after which it 
fades away to zero. It is possible to give an envelope of this nature to the notes 
produced by the S U N D command. The associated E N V command is used to do this. 
First let's look at a simple example: 

ENV 1,5,3,4,5,-3,8 
SOUND 1,284,0,0,1 

The ENV must come before the SOUND command for which it is used. To use this 
envelope in a S U N D command, its number is included as the fifth part of the SOUND 
command - in this case, the envelope is number 1 . The first number in an ENV 
command is the number of the envelope that it defines. The ENV instruction contains 
information about how long the note will last and how loud it will get, so the duration 
and volume parts of the SOUND command are set to zero. The envelope defined above 
causes the sound to be increased in 5 steps, each step increasing the volume by 3 , and 
each step being 4 hundredths of a second long. The volume is then to be reduced in 5 
steps, each step decreasing the volume by - 3 , each step being 8 hundredths of a 
second long. In other words, the first number identifies which envelope is being 
defined, and this is then followed by two groups of three numbers, and in each of these 
groups, the first number indicates by how many steps the volume is to go up or down. 
The second number indicates by how much the volume is to go up or down at each of 
these steps, and the third number determines by how long each step of volume is to be 
held for. 
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The total length of time that each section will take is equal to the first value (number 
of steps) multiplied by the third value (pause time). The total increase or decrease in 
volume is equal to the number of steps multiplied by the step size. The overall length 
of an envelope with more than one section, is equal to the sum of the lengths of each 
section, 

Of course, the starting volume needn't always be (as set by the S U N D command). 
The above example produced a note that went up, then back down again. The 
following will go down, then back up: * 

ENV 2,5,-2,1,20,0,1,10,1,1 
SOUND 1,248,0,15,2 

This envelope is given the number 2 and has three sections. In the first, the volume is 
reduced in 5 steps of - 2 . That is, it goes down by 2 at each step and there are 5 steps. 
The length of each of these steps is 1 hundredth of a second. The second section 
consists of 20 steps, but with (zero) reduction or increase in the volume (i.e. 
constant volume) per step. Again, the length of each of these steps is 1 hundredth of a 
second. Finally, the third section has 1 steps, each increases the volume by 1 , and 
once again each step is 1 hundredth of a second long. 

The SOUND command has a starting volume of 1 5 , so after the first section the 
volume will be reduced to 5, this is held constant for 20 hundredths of a second, then 
gets increased to 15 in the final section of the envelope. 

It is perhaps a little difficult to visualise the shape of these envelopes. It often helps to 
draw them out on graph paper and take the values for the ENV command from this. 
The following show the shape of the two envelopes that have been defined so far: 
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Change 




step count 

5 
step size 

-a., i 

pause time 



STEP COUNT 20 

STEP SIZE O I 

PAUSE TIME 1 | 



The maximum number of sections in an envelope is 5, and each section takes 3 values, 
so the ENV command can have up to 16 parts (including the first, that identifies 
which of the 15 envelopes (1 to 15) is being created). If the steps up or down cause the 
volume to go above 15 or below then the value will wrap around; so the step above 15 
is 0, and the step below is 15: 

ENV 3,9,5,20 
SOUND 1,248,0,0,3 

This simple envelope produces 9 steps, each step increasing the volume by 5, and 
each step lasting 2 hundredths of a second. After the first three steps therefore, the 
volume will be 15, so the next step will take it back round to 4, then 9 and so on. The 
diagram on the following page shows the effect : 
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14- 
13 



ao 



90 



STEP COUNT 9 
STEP SIZE 5 
PAUSE TIME 20 



The range of values for the number of steps is to 127. The step size can be varied 
from —128 to +127 (negative values decrease the volume), and the pause time (i.e. 
the time between steps) can be anywhere in the range to 255. 

Now that we can create a volume envelope to give a characteristic shape, we may also 
want to define a characteristic tone pattern to include things such as vibrato - where 
the sound 'wavers' about the main tone of the note. 

This is done in a very similar way to that in which volume envelopes are defined. 
Tone envelopes are defined using the E N T command. For example: 

ENT 1,5,1,1,5,-1,1 
SOUND 1,248,10,15,,! 

A tone envelope is called into the SOUND command by entering the tone envelope's 
number as the sixth part of the SOUND command. Again the ENT must come before 
the SOUND command. 
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This first example of E N T specifies that in tone envelope number 1 , there is to be 5 
steps, each step increasing the tone period by 1 , each step being 1 hundredth of a 
second. The next section of the envelope again specifies 5 steps, this time each step 
decreasingthe tone period by - 1 , again eaeh step being 1 hundredth ofa second. This 
is a total length of 5 + 5 = 10. Notice that this length was specified in the SOUND 
command because a tone envelope does NOT determine the length of time that a note 
will play (in the same way that a volume envelope does). If the length used in the 
SOUND command is shorter than the length of the tone envelope, then the last part of 
the tone envelope will be lost. If it is greater, then the last part of the note will play 
with a constant tone. This also applies if a volume envelope is used to determine the 
note length. 

(Notice the absence of any number in the volume envelope part of the SOUND 
command - this is because we have not created a volume envelope for this sound.) 

The majority of tone envelopes will probably be much shorter than the expected 
length of the note. For this reason, a tone envelope can be made to repeat throughout 
the time that the note is playing. This is done by specifying a negative envelope 
number, the positive equivalent of which must be used in the SOUND command: 

ENT -5,4,1,1,4,-1,1 
SOUND 1,248, 100, 12, ,5 

This will produce a vibrato effect on the note. When defining tone envelopes, it is 
usually best if they can be made to vary symmetrically about the initial tone period, 
so that when the note repeats, it will not go further and further off the initial 

frequency (pitch) - try this: 

ENT -6,3,1,1 

SOUND 1,248, 90, 12, ,6 

You will notice that this tone will fall in frequency quite dramatically because each 
time the envelope is repeated, the tone period will increase by 3 and this will happen 
30 times (90/3). This sort of effect can be quite useful for 'warbling' notes and sirens: 

ENT -7,20,1,1,20,-1,1 
SOUND 1,100, 400, 12, ,7 

ENT -8,60,-1,1,60,1,1 
SOUND 1,100, 480, 12, ,8 

The number of possible tone envelopes is 15 (in the range 1 to 15), with a negative 
value indicating that the envelope should repeat. The number of steps (the first value 
in each group of three), can be anywhere between and 239. As in the volume 
envelope, the step size can be from -128 to 127, and the pause time should be between 
and 255. Once again, an ENT command, like an ENV command, can have a 
maximum of five sections (each containing 3 values). 
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The final part that can be added onto a SOUND command is a seventh value that 
indicates the level of noise which should be included in the sound. One point that 
should be borne in mind when including noise in a sound, is the fact that there is only 
one noise channel, so each subsequent noise period value overrides any previous one. 

The noise can be added to a tone to give it a different sound, or can be used quite 
separately, by setting the tone period (second part) of the S U N D command to , so 
that only noise is present. This is of use in making percussive type sounds. Try this 

ENT -3,2,1,1,2,-1,1 

ENV 9,15,1,1,15,-1,1 

FOR a=1 TO 10: SOUND 1,4000,0,0,9,3,15: NEXT - 

This could form the basis of a train noise. You will notice that this combines both 
types of envelopes and noise. 

The duration and volume parts of the SOUND command are both set to as they are 
determined by the volume envelope. 

Now that we can hopefully use the SOUND, ENV and ENT commands to their full, we 
can look at various other associated commands and functions. 

In describing the channel number of the S U N D command, you will remember that 
by adding 64 to it, the sound was marked as 'held' so that it would remain in the 
queue, without playing until released. The way in which a sound can be released is by 
use of the RELEASE command. The word RELEASE is followed by a bit significant 
number, where each bit is used to indicate one of the three possible channels to be 
released. Once again, it is not important to fully understand this, as long as you 
realise that: 

4 means channel C 
2 means channel B 
1 means channel A 

....and a combination of channels is released by adding up the values for each of the 
channels. So, to release held sounds on all three channels the following would be 
used: 

RELEASE 7 

....where 7 = 1 + 2 + 4. If no channels are held, then the RELEASE command is 
ignored. Try the following: 

SOUND 1+64,90 

SOUND 2+64,140 

SOUND 4+64,215 

RELEASE 3: FOR t=1 TO 1000: NEXT: RELEASE 4 
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The sounds that you might expect from these SOUND commands are not produced 
until the first RELEASE command which allows the sounds on channels A and B to 
play. After the delay, the sound on channel C is RELEASE d. 

There is yet another method by which more than one sound can be made to 
rendezvous. When a sound is added to a queue that has the hold bit set (64 added), 
then it is not just that sound which is held, but all subsequent sounds sent to that 
queue. If more than four further sounds are sent to the held queue, then the machine 
will pause until the queue is released, perhaps by using a sub-routine that is called 
after a fixed period of time (using AFTER or EVERY). However this is not a 
particularly good method for using the sound system, as the program that contains 
the sound commands may pause from time to time as the sound queues fill up. This is 
also true if a lot of long sounds are added in quick succession. Try this: 

10 FOR a = 1 TO 8 



10 FOR a=1 TO 8 

20 SOUND 1,100*a,200 

30 NEXT 

40 PRINT "hello" 



10 3 = 

20 ON SflCl) GOSUB 1000 

30 PRINT a; 

40 GOTO 30 

1000 a=a+10 

1010 SOUND 1,3,200 

1020 IF a<200 THEN ON S9(1) GOSUB 1000 

1030 RETURN 

run 

You will notice that the program never pauses. The SOUND command is only called 
when channel A's queue (number 1 ) has a free slot. This condition is detected by the 
ON SQC1) GOSUB command in line 20. The command initialises an interrupt 
mechanism that will call the sound sub-routine when a free slot appears in the 
specified queue. Once ON SQ GOSUB has been used, it must be re-initialised, 
and this is done by line 1020 in the sound sub-routine. In this example, the sound 
sub-routine only re-initialises itself while the value of 'a ' is less than 200. 
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run i 



You will notice that the word 'h e I L o' does not appear instantly, but only after the 
first three sounds . This is because program execution cannot continue until there is a 
free space in the queue. 

The BASIC contains an interrupt mechanism, rather like that used in the A F T E R 

and EVERY commands, and in ON BREAK GOSUB. This enables you to specify a , 

sound playing sub-routine that is only called when a free space appears in the 

required queue. Try this: ' 



In a complete program that may be moving objects on the screen, adding up totals and 
the like, a background tune can be kept continually playing by having a sub-routine 
called to play each note only when there is a free slot in the queue. This ensures that 
the program does not pause while waiting for a free slot to appear. If the note values 
for this tune were being read from DATA statements, then the sound routine could be 
set stop re-initialising itself just before the data is exhausted. 

The number within the brackets of the ON SQO GOSUB commandcanbel,2or 
4 depending on which channel queue is to be tested for a free slot. 

There is a function SQO that may be used within a program to read the current state 
of any of the sound channels. The number within the brackets after S Q is again 1, 2, 
or 4 f to specify for which channel the information should be returned. The function 
returns a bit-significant number and will again require an understanding of binary 
numbers to decipher it. The bits of the value returned have the following significance: 



BIT DECIMAL MEANING 

0, 1, 2 1 , 2, 4 Number of free spaces in the queue 

3 8 Note at head of queue is marked to rendezvous with A 

4 16 Note at head of queue is marked to rendezvous with B 

5 32 Note at head of queue is marked to rendezvous with C 

6 64 Top note in queue has hold bit set (the queue is held) 

7 128 A note is currently playing 



Try this simple example: 

10 SOUND 2,200 

20 x=SQ(2) 

30 PRINT BIN$(x) 

run 

This will print the binary number 10000100, in which bit 7 is set, indicating that 
the channel was currently playing when the S Q function was used. The last three 
digits 100, when converted to decimal give the value 4 indicating that there were 4 
free entries in the queue. This function may be used to test a queue's status at a given 
point within a program - unlike ON SQO GOSUB which will test and react to a 
queue's status at an indeterminate point. 

So far, all the examples have just dealt with one or two notes of sound. Processing a 
whole group of unrelated notes, for example in a piece of music, can be achieved by 
listing the required notes in a A T A statement, from where they can be R E A D into a 
SOUND command: 
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10 FOR octave=-1 TO 2 

20 FOR x=1 TO 7: REM notes per octave 

30 READ note 

40 SOUND 1, note/2 | octave 

50 NEXT 

60 RESTORE 

70 NEXT 

80 DATA 426,379,358,319,284,253,239 

run 

The final example program in this section greatly elaborates on this basic principle. 
The tune and rhythm play on channels A and B, using rendezvous to keep in step. The 
example demonstrates one of the ways in which DATA can be formatted so as to 
include note, octave, length and rendezvous information: 



10 REM Line 190 gives treble clef tune 

20 REM line 200 gives bass clef tune 

30 DIM scaleX(12) : FOR x2 = 1 TO 12:READ sea le%Cx%) :NEXT 

40 chU = 1:READ ch1 $ : ch2X = 1 : READ ch2$ 

50 CLS 

60 Spd%=12 

70 scaLe$=" a-b b c+c d-e e f+f g+g" 

80 ENV 1,2,5,2,8,-1,10,10,0,15 

90 ENV 2,2,7,2,12,-1,10,10,0,15 

100 ENT -1/1,1/1,2,-1,1,1,1,1 

110 DEF FNM$(s$,s)=MID$(s$,S,1) 

120 ch1J£ = 1:G0SUB 200 

130 ch2%=1:G0SUB 380 

140 IF chU + ch2X>fl THEN 140 

150 END 

160 DATA &777,S70C/86a7,&647/&5ed,&598 

170 DATA &547,&4fc,84b4,&470,&431,&3f4 

180 DATA 4cr4f4f If 1 gl Al-B2C2f 4g2g1 A1 -B6A2Cr If Iglflglal- 
blAl-b2C2g2A2g2f 1g1 a2g2f 6e2c2e2c2g2e2c1-B1 A2g2f 4e4d 
8c4f3f 1c2d4-b2f r2-B2A2g2f 6e2gr4C4-B1a1 f 1-b1g2c2-b4a 
4g4f r6A2A2-B4-B2Ar2-B2A2g2f6e2g4C4-B1A1f 1-B1g2C2-B4 
A4g8f . 

190 DATA r4f4f8f4e4c4f r8f 4e2f 2e4d2e2d8c8c6e2f 4g4g8e4f 3f 
1c4dr8g4cr4e4c6f2d4c4c8f r8-e4dr8g8c4e4c6f 2d4c4c8f . 

200 REM send sound to channel A 

210 P 1$=FNM$(ch1$,ch1%) 

220 IF p1$o"r" THEN r1X = 0:GOTO 240 

230 r1%=16:ch1X = chU + 1:p1$=FNM$(ch1$,chU) 



continued on the next page 
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240 IF p1$ = ". M THEN chU = 0:RETURN ELSE LU = VAL(p1S) 

250 ch1X = chU + 1 

260 n1$=FNM$(ch1$,chU) 

270 ch1X = chU + 1 

280 IF n1$="+" OR n1$="-" THEN 350 

290 n1$=" "+n1$ 

300 nd1%=(1 + INSTR(sca(.e$,LOWER$(n1$>))/2 

310 IF ASC(RIGHT$<n1$,1))>96 THEN oU = 8 ELSE oU = 16 

320 SOUND 1 + rU,scaleX(ndU)/on / SpdX*L1X / 0,1,1 

330 ON SQ(1) GOSUB 200 

340 RETURN 

350 n1$=n1$+FNM$(ch1$,ch1%) 

360 chU=chU + 1 

370 GOTO 300 

380 REM send sound to channel B 

390 p2$=FNM$(ch2$,ch2%) 

400 IF p2$o"r" THEN r2%=0:GOTO 420 

410 r2X=8:ch2%-ch22+1:p2$=FNm$<ch2$,ch2%) 

420 IF p2$="." THEN ch2% = : RETURN ELSE L2% = VALCp2$) 

430 ch2%=ch2%+1 

440 n2$=FNM$(ch2$,ch2%) 

450 ch2%=ch2X+1 

460 IF n2$="+" OR n2$="-" THEN 530 

470 n2$=" "+n2$ 

480 nd2%=(1+INSTR(scaLe$,LOWER$(n2$)))/2 

490 IF ASC(RIGHT$(n2$,1))>96 THEN o2X=4 ELSE o2%=8 

500 SOUND 2+r2%,scaLe%(nd2%)/o2X,Spd%*L2X,0 / 2 

510 ON SQC2) GOSUB 380 

520 RETURN 

530 n2$=n2$+FNM$(ch2$,ch2%) 

540 ch2X=ch2%+1 

550 GOTO 480 

run 



Graphically speaking.... 

This section describes the graphics facilities available. The first example builds up 
slowly demonstrating each major feature in turn. 

To start off with, we will divide the screen into a text window (line 4 0) and a graphics 
window (line 30), setting the MODE and a couple of flashing colours along the wav 
(line 20): 
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10 REM mask and tag in window 

20 MODE 1:INK 2,10,4:INK 3,4,10 

30 ORIGIN 440,100,440,640,100,300 

40 WINDOW 1,26,1,25 

50 CLG 2 

If you RUN this program you will see a square of flashing colour halfway down the 
right-hand side of the screen. This square has been cleared to ink number 2 (flashing 
magenta/cyan) by line 50, and the origin of co-ordinates has been moved to the 
bottom left hand corner of the square. The MODE command has set the graphics 
cursor to the origin of co-ordinates (X=0, Y=0) so we can draw a diagonal line across 
the square with line 6 : 

60 DRAW 200,200,3 

RUN the new program to see the effect. Now add: 

80 HOVE 0,2:FILL 3 

Line 8 puts the graphics cursor just inside one of the two halves of the square and 
fills it with ink 3. The boundary of the fill is the edge of the graphics window (in this 
case also the edge of the square) and anything drawn in the current graphics pen (3) 
or anything drawn in the ink being used to fill (also 3). 

Now RUN the resulting program. 

To prove the point about 'fill' edges, add line 70 below. Note that it is only the fact 
that the fill is in the same ink as the diagonal line that restricts the fill to half the 
square. 

70 GRAPHICS PEN 1 
run 

Edit line 80 to FILL with ink 1 then R U N to prove this last point. Then restore it 
back to the original (F ILL 3). 

Now add lines 1 to 1 4 , which draw a box: 

100 MOVE 20,20 

110 DRAW 180,20 

120 DRAW 180,180 

130 DRAW 20,180 

140 DRAW 20,20 
run 
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The box is drawn in ink 1 because of line 70. If line 70 were omitted then we would 
need to add a ' , 1 ' either as the third parameter of the MOVE command in line 1 , or 
the third parameter of the DRAW command in line 1 1 in order to instruct the 
computer to change graphics pens. 

Join the dots.... 

Lines need not be solid, they can be dotted. The MASK command allows us to specify 
the size of the dots. The pattern will repeat every 8 pixels and each subsequent line 
will continue the dotting scheme from where the last line left off. A new MASK 
command (probably with the same parameter as the current one) will reset the 
dotting logic to the start of the 8 pixel pattern. 

The dotting pattern is actually a single byte binary number where the bits set 
indicate where to put pen ink. In our example we will use a binary constant (called up 
by the '&X') indicating that we want four pixels drawn in the middle of each 8 pixel 
group, with the two either side not drawn. This will give a dashed line with four 
pixels on and four pixels off. To do this, add: 

90 MASK &X00111100 

run 

But hold on a moment! This program does not give us a smooth continuation of the 
dotting around the corners as we expected. The reason for this is that each corner 
point is actually plotted twice, once as the last pixel of one line, and again as the first 
pixel of the next line. A clumsy way around this is to type in: 

115 MOVE 180,22 

125 MOVE 178,180 

135 MOVE 20,178 
run 

... .which produces the desired effect. However there is a simpler way, which is to add a 
second parameter ',0' to the end of the MASK command which tells the computer 
NOT to plot the first point of each line. Edit line 9 to read: 

90 MASK 100111100,0 

....and delete the lines you just added by typing: 

115 
125 
135 
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Now RUN, and once again the dotted box is symmetrical. Note that if the second 
MASK parameter is ' , 1 ' the command will be reset to draw whole lines including the 
first pixel. 

Now look in between the dashes of the line. There is something in the bottom right 
triangle which is not in the top left triangle. This is the graphics paper, which is set to 
ink 2 by the C LG 2 command in line 50, but is invisible in the top left triangle 
because it is the same colour as the background. Alter line 5 to read: 

50 CLG 2:GRAPHICS PAPER 

. ...and re- run the program. The paper now shows up clearly all round the box. ' 

It is possible make the graphics paper invisible, or, as we call it 'transparent'. This 
means that a dotted line drawn over an existing picture will preserve the gaps 
between the dots. The graphics drawing is made transparent by adding a ' / 1 ' 
parameter to the GRAPHICS PEN command. (It is reset to non-transparent or 
'opaque' by a', 0' parameter). Alter line 70 to read: 

70 GRAPHICS £A?ER 1,1 
run '9'-™ 

....and observe the result. 

As well as drawing lines (and plotting points) it is possible to write normal text 
characters at the position of the graphics cursor. This has the advantage that we can 
position the characters with much greater accuracy (within one pixel rather than 
within 8 pixels) and also that we can draw characters with the added flavour of 
graphics ink modes (see ahead). 

To write characters at the graphics cursor location, simply position the graphics 
cursor at the top left-hand comer of where you want the character to be drawn, then 
issue the command T AG (or T A G #1 etc, for other text streams) followed by normal 
P R I N Ting commands. The graphics cursor is automatically stepped right by 8 pixels 

after each character is drawn. Add: 

160 MOVE 64,108 

170 TAG 

180 PRINT "SALLY" 

190 TAGOFF 

run 

(Any messages output by BASIC will be sent to the text screen irrespective of the 
state of the TAG/TAGOFF switch, but it is good practice to cancel the TAG 

assignment as soon as the T A Gging is over.) 
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But what are the arrows after the name? Well, these are carriage-return CHR$(13) 
and line-feed CHR$(10) symbols. The graphics drawing software translates all of 
the first 32 ASCII characters into their printable versions (as if they were each 
preceded by a C H R$ ( 1 ) ; when sent to the text screen). The reason for this is that 
most of the first 32 control codes are meaningful only to the text screen. By the same 
token for example, if we overflow to the right of the graphics window, no wrap-around 
is performed. 

The carriage-return and line-feed symbols can be suppressed by the normal 
technique of ending the PRINT statement with a semicolon, i.e: 

180 PRINT "SALLY"; 
run 

Text sent to the graphics screen using T A G is influenced by the same GRAPHICS 
PEN commands as the line drawing. Thus currently, the name is written in 
GRAPHICS PEN 1, and is transparent. The command: 

150 GRAPHICS PEN 1,0 

run 

. ...will switch back to opaque paper, whilst: 

150 GRAPHICS PEN 0,1 
run 

....will write with ink number 0, transparently. 

Now delete line 15 and RUN again. Ink number 1 + transparent mode (previously 
set in line 7 0) will be restored to the graphics pen. 

Transparent characters 

It is also possible to write characters to the text screen transparently, by using one of 
the control codes provided. Add: 

200 PRINT #2,CHR$(22);CHR$(1) 

210 LOCATE #2,32,U:PRINT #2,"******" 

220 LOCATE #2,32, 14 : PRINT #2," " 

230 PRINT #2,CHR$(22);CHR$(0) 
run 

Line 200 sets stream # 2 to transparent mode. Note how the underlining appears to 
'overstrike' the asterisks. This demonstrates that it is possible to build up composite 
characters, even in multiple colours. Line 23 switches off transparent mode, 
setting stream # 2 back to opaque mode. 
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Ink modes 

It is possible to draw using a graphics ink mode which combines the current drawing 
with the ink already on the screen. The final ink for each pixel is calculated by 
forming the logical combination of the old ink for the pixel with the graphics ink (pen 
or paper) being plotted. The logical combinations provided are XOR, AND and OR. 
The ink mode can be set either as the fourth parameter of DRAU7DRAWR, 
PLOT/PLOTR and HOVE/HOVER commands or by PRINTing a CHR$(23); 
CHR$ (<mode>) control code sequence. In each case a value of 1 sets XOR plotting, 2 
sets AND plotting and 3 sets OR plotting. A value of restores the 'force,' mode, 
where the graphics ink is used 'as is'. 

The next example demonstrates the use of the XOR combination. XOR is often used 
in so-called Turtle Graphics because it has the property that drawing the same 
pattern twice restores the original image. Thus the square drawing routine is 
executed twice (in lines 1 1 and 1 30), and the TAGged printing is also executed 
twice {in lines 170 and 190). The FRAME commands cause enough delay to make 
the effect visible. Note the use, in line 90, of commands without a first parameter. 
This is quite in order in these commands, and simply leave the current settings of the 
first parameter unchanged. 

The third parameter ( , 1 ) of the M V E command in line 220 sets the GRAPHICS 
PEN to 1, overriding the '3' set in line 60, The XOR mode is set by the fourth 
parameter of the DRAWR command in line 230. Note once more the missing 
parameter. 

A reminder of the first-point plotting effect can be seen by removing the MASK 
command in line 90. The corners of the square disappear because they are drawn 
twice (at the end of one line and the start of the next) and are therefore cancelled out 
by the XORing action. 

10 REM XOR ink modes 

20 MODE 1:INK 2,10:INK 3,4 

30 ORIGIN 440,100,440,640,100,300 

40 WINDOW 1,26,1,25 

50 CLG 2:GRAPHICS PAPER 

60 DRAW 200,200,3 

70 MOVE 2,0:FILL 3 

80 ORIGIN 440,0,440,640,0,400 

90 GRAPHICS PEN ,1:MASK ,0 

100 FOR y=60 TO 318 STEP 2 

110 GOSUB 220 

120 FRAME:FRAME 

130 GOSUB 220 

continued on the next page 
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U0 NEXT 

150 TAG 

160 FOR y=60 TO 318 STEP 2 

170 MOVE 96,y:PRINT CHR$(224); 

180 FRAHE:FRAHE 

190 HOVE 96,y:PRINT CHR$(224); 

200 NEXT 

210 END 

220 HOVE 90,y,1 

230 DRAWR 20,0, ,1 

240 DRAWR 0,20 

250 DRAWR -20,0 

260 DRAWR 0,-20 

270 RETURN 

run 



Animation 

It is possible to produce an animation effect by switching the colours assigned to inks. 
Although the contents of the screen memory are unchanged, there appears to be 
movement. An example of this is included in the Welcome' program on your master 
system disc (type RUN "disc" to see that demonstration). The simple palette 
switching of that example is not enough however, if the animated patterns are 
required to overlap. The next example uses ORing of inks to write the numbers 1 to 4 
onto the screen. (The shape is determined by scanning the character printed at the 
bottom left hand corner and reproducing what is found, in big block graphics.) The 
numbers are written in turn using inks 1,2,4 and 8 with the OR mode turned on - in 
this case with a control character sequence, see line 5 . 

Lines 1 6 onwards rotate the palette according to a mathematical formula which 
results in one block graphics number at a time being displayed. The inks are set by 
inspecting each ink in turn and determining if it includes the binary component that 
we are looking for. For example, the number 3 was drawn in ink 4 and therefore to 
show the number 3 we must allocate a visible colour to all inks whose number 
contains a binary 4. Those inks are: 

4 (0100), 5 (0101), 6 (0110), 7 (0111), 12 (1100), 13 (1101) ,14 (1110) ,15 (1111) 

In a practical application the inks which require to be changed at each stage in the 
animation would be calculated, and lines 180 to 200 would be replaced by a 
speedier section of program. 
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10 REM Latch animation 

20 ON BREAK GOSUB 220 

30 FOR i=1 TO 1 5 : INK i,26:NEXT 

40 m(1)=1:m(2)=2:m(3)=4:m(4)=8 

50 MODE 0:PRINT CHR$<23) ; C HR$(3> ; : TAG 

60 FOR P=1 TO 4 

70 GRAPHICS PEN m(p),1 

80 LOCATE #1,1,25:PRINT#1,CHR$(48+p); 

90 FOR x = TO 7 

100 FOR y = TO 14 STEP 2 

110 IF TEST(x*4,y)=0 THEN 140 

120 MOVE (x+6)*32,(y+6)*16:PRINT CHR$(H3); 

130 MOVE <x+6)*32,<y+7)*16:PRINT CHR$(143); 

140 NEXT y,x,p 

150 LOCATE #1,1,25:PRINT#1," "; 

160 FOR p=1 TO 4 

170 FOR i= 1 TO 25:FRAME:NEXT 

180 FOR i=0 TO 15 

190 IF Ci AND m(p))=0 THEN INK i ,0 ELSE INK i ,26 

200 NEXT i,p 

210 GOTO 160 

220 INK 1,26 

run 



Colour plane sprites 

In the example above we have seen how, having written graphics in inks 1,2, 4 and 8, 
an animation effect can be produced by colour changing. If the same inks are used, 
but the colours set up in a different way then a completely different effect can be 
produced. This effect is known as 'colour planes' and is demonstrated in the example 

below. 

10 REM mountains 

20 DEFINT a-z 

30 INK 0,1:INK 1,26 < 

40 INK 2,6:INK 3,6 

50 FOR i=4 TO 7:INK i,9:NEXT i 

60 FOR i=8 TO 15:INK i,20:NEXT 

70 MODE 0:DEG:ORIGIN 0, 1 50 : CLG : MOVE 0,150 

80 FOR x=16 TO 640 STEP 16 ^ 



i 



continued on the next page 
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90 DRAW x,COS(x>*150+RND*100,4 

100 NEXT 

110 MOVE 0,0:FILL 4 

120 cx=175:GOSUB 320 

130 cx=525:GOSUB 320 

140 SYMBOL 252,0,0,&C,S1F,K30,87F,8FF 

150 SYMBOL 253,0,6,&E,&F2,2,&F2,&FE 

160 SYMBOL 254,0, 860, &70,&7F ,67F ,&7F,&7F 

170 SYMBOL 255,0,0,0,&F8,8EC,6FE,&FF 

180 pr$=CHR$(254)+CHR$C255) 

190 pL$=CHR$C252)+CHR$(253) 

200 TAG:t !=TIME 

210 FOR x=-32 TO 640 STEP 4 

220 x2=((608-x>*2)MOD 640 : h L = RND*10 : hr = 50*SIN Cx) 

230 GRAPHICS PEN 8,1:M0VE x, 100+hr,,3 : PRINT pr$; 

240 GRAPHICS PEN 2,1:MOVE x2, 1 1 5 + h L,,3 : PRINT pL$; 

250 IF (TEST(x2-2,115+hl-12) AND 8>=8 THEN 380 

260 IF TIME-t!<30 THEN 260 

270 FRAMErt !=TIME 

280 GRAPHICS PEN 7,1:M0VE x, 100+hr,,2 : PRINT pr$; 

290 GRAPHICS PEN 13,1:M0VE x2,1 1 5 + h I, ,2 : PRINT pL$; 

300 NEXT 

310 GOTO 210 

320 MOVE cx,100 

330 FOR x=0 TO 360 STEP 10 

340 DRAW cx+SIN(x)*50+10*RND,100+COS(x)*25+10*RND,1 

350 NEXT 

360 DRAW cx,100:MOVE cx,90:FILL 1 

370 RETURN 

380 ENT -1,1,1,1 

390 SOUND 1,25, 400, 15,, 1,15 

400 FOR y=100+hr TO -132 STEP -2 

410 GRAPHICS PEN 7,1:M0VE x,y,,2:PRINT pr$; 

420 GRAPHICS PEN 8,1:H0VE x,y-2,,3: PRINT pr$; 

430 NEXT 

440 GOTO 70 

run 



To explain how this works we must, once again, visualise the INK number in binary. 
Starting with the highest INK number (15), all the I N Ks with the '8' bit present (15 
down to 8) are set to cyan. Then all the I N Ks with the '4' bit present (7 down to 4) are 
set to green. I N Ks 2 and 3 , each with the '2' bit present are set to red, and finally INK 
1 is set to bright white, with INK remaining as blue. 
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On the screen the graphics are ORed into place - see lines 230 and 240. The colour 
seen on the screen in any particular pixel is determined by the most significant bit of 
the resultant at that point. Therefore an image in a 'more significant' plane will 
always obscure an image in a 'less significant' plane, but the background will be 
preserved and can be seen again if the 'more-significant' image is removed. The way 
to remove an image is to plot it using the AND ink mode with INK numbers of 7,1 1 ,13 
or 14 removing original I NKs of 8,4,2 and 1 respectively -see lines 2 80 and 290. 

Each of the above 4 programs demonstrates particular aspects of graphics on the 
CPC664. Graphics is potentially the most exciting aspect of computing, and much of 
the excitement is generated by the ingenuity of you the programmer. It would be 
impossible to summarise the computer's full graphics capabilities in this instruction 
manual, and we suggest that you continue to experiment with the many graphics 
commands and functions provided. 



The machine itself.... 

To conclude this chapter, a few words about the inside of your 
computer. 

The CPC664 is based around the Z80 microprocessor. The machine also contains a 
32K ROM that is addressed in two halves, the upper half contains the BASIC 
interpreter which lives in the memory map from &C000 to &FFFF. The lower half is 
mapped from &0000 to &4000 and contains the firmware which carries out all the 
mundane tasks such as running the machine, reading the keyboard, driving the 
screen, etc. 

The CPC664 also contains a ULA that enables the 8 bit CPU to address more than 
64K of memory. This is why the screen and the BASIC ROM can have the same 
address. The top 16K of RAM is used by the 6845 video controller chip to store the 
pixel colour information that generates the picture. The keyboard is scanned by the 
8255 parallel interface chip, which is also used to drive the AY-3-8912 sound chip. 

The printer port is provided by an 8 bit latch. There are 7 data bits, while the eighth 
bit is used to latch the strobe signal. At the expansion port, all the standard Z80 bus 
signals are brought out to the edge connector, but they are not buffered. 

For further technical details of this computer including circuit diagrams, PCB 
layouts, etc, consult the CPC664 Service Manual, available from AMSTRAD. 
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Appendix 1 

Digital Research & AMSTRAD 

End User Program 
Licence Agreement 



NOTICE TO USER - PLEASE READ THIS NOTICE CAREFULLY. DO 
NOT OPEN THE DISKETTE PACKAGE UNTIL YOU HAVE READ 
THIS LICENCE AGREEMENT. 

OPENING THE DISKETTE PACKAGE INDICATES YOUR AGREE- 
MENT TO BE BOUND BY THESE TERMS AND CONDITIONS. 



1. Definitions 

- In this Licence Agreement, the terms: 

1. DRI means DIGITAL RESEARCH (CALIFORNIA) INC., P.O. Box 579, Pacific 
Grove, California 93950, owner of the copyright in, or authorised licensor of, the 
program. 

2. Machine means the single microcomputer on which you use the program. 
Multiple CPU systems require additional licences. 

3. Program means the set of programs, documentation and related materials in 
this package, together with all ancillary updates and enhancements supplied by 
DRI to you regardless of the form in which you may subsequently use it, and 
regardless of any modification which you make to it. 

4. AMSTRAD means AMSTRAD CONSUMER ELECTRONICS PLC, Brentwood 
House, 169 Kings Road, Brentwood, Essex CM14 4EF. 

You assume responsibility for the selection of the program to achieve your 
intended results, and for the installation, use and results obtained from the 
program. 
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2. Licence 

You may: 

1 . Use the program on a single machine. 

2. Copy the program into any machine readable or printed form for backup or 
modificaton purposes in support of your use of the program on a single machine. 
You may make up to 3 {three) copies of the program for such purposes. (Certain 
programs, however, may include mechanisms to limit or inhibit copying. They 
are marked 'copy protected'). Copying of documentation and other printed 
materials is prohibited. Disassembly of code is prohibited. 

3. Modify the program and/or merge it into another program for your use on the 
single machine. {Any portion of this program merged into another program will 
continue to be subject to the terms and conditions of this Agreement). 

4. Transfer the program and licence to another party if you notify DRI of name and 
address of the other party and the other party agrees to a) accept the terms and 
conditions of this Agreement, b) sign and forward to DRI a copy of the 
registration card and c) pay the then current transfer fee. If you transfer the 
program, you must at the same time either transfer all copies, including the 
original, whether in printed or machine readable form to the same party, or 
destroy any copies not transferred; this includes all modifications and portions 
of the program contained or merged into other programs. 

You must reproduce and include the copyright notice on any copy, modification or 
portion merged into another program. 



EACH DISKETTE IS SERIALISED, AND YOU MAY NOT USE, COPY, 
MODIFY, TRANSFER, OR OTHERWISE MAKE AVAILABLE TO ANY 
THIRD PARTY, THE PROGRAM, OR ANY COPY, MODIFICATION OR 
MERGED PORTION, IN WHOLE OR IN PART, EXCEPT AS 
EXPRESSLY PROVIDED FOR IN THIS LICENCE AGREEMENT. 

IF YOU TRANSFER POSSESSION OF ANY COPY, MODIFICATION 
OR MERGED PORTION OF THE PROGRAM TO ANOTHER PARTY, 
YOUR LICENCE IS AUTOMATICALLYTERMINATED. 
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3. Term 

The licence is effective until terminated. You may terminate it at any other time by 
destroying the program together with all copies, modifications and merged portions 
in any form, it will also terminate upon conditions set forth elsewhere in this 
Agreement or if you fail to comply with any term or condition of this Agreement. You 
agree upon such termination to destroy the program together with all copies, 
modifications and merged portions in any form . 

4. Limited Warranty 



THE PROGRAM IS PROVIDED AS IS'. NEITHER DR1 NOR 
AMSTRAD MAKE ANY WARRANTY OF ANY KIND, EITHER 
EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO THE 
IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS 
FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS TO THE 
QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. 
SHOULD THE PROGRAM PROVE DEFECTIVE, YOU (AND DRI OR 
AMSTRAD) ASSUME THE ENTIRE COST OF ALL NECESSARY 
SERVICING, REPAIR OR CORRECTION. 



Neither DRI nor AMSTRAD warrant that the functions contained in the program 
will meet your requirements or that the operation of the program will be 
uninterrupted or error free. 

However, AMSTRAD warrants the diskette on which the program is furnished, to be 
free from defects in materials and workmanship under normal use for a period of 
ninety (90) days from the date of delivery to you as evidenced by a copy of your receipt. 

5. Limitations of Remedies 

AMSTRAD's entire liability and your exclusive remedy shall be the replacement of 
any diskette not meeting this 'Limited Warranty' and which is returned to AMSOFT 
with a copy of your receipt. 



IN NO EVENT SHALL DRI OR AMSTRAD BE LIABLE FOR ANY 
DAMAGES, INCLUDING ANY LOST PROFITS, LOST SAVINGS, OR 
OTHER SPECIAL INDIRECT OR CONSEQUENTIAL DAMAGES, 
EVEN IF DRI OR AMSTRAD HAS BEEN ADVISED OF THE 
POSSIBILITY OF SUCH DAMAGES, OR FOR ANY CLAIM BY ANY 
OTHER PARTY. 
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6. Registration Card 

DRI may from time to time update its programs. Updates will be provided to you only 
if a properly signed registration card is on file at DRI's main office or an authorised 
registration card recipient. DRI is not obligated to make any program updates, or to 
supply any such updates to you. 



7. General 

You may not sublicence, assign or transfer the licence or the program except as 
expressly provided in this Agreement. Any attempt otherwise to sublicence, assign or 
transfer any of the rights, duties, or obligations hereunder is void. 

This Agreement shall be governed by and construed in accordance with the laws of 
England. 

Should you have any questions concerning this Agreement, you may contact DRI by 
writing to Digital Research Inc., P.O. Box 579, Pacific Grove, California 93950. 



THIS AGREEMENT CANNOT AND SHALL NOT BE MODIFIED BY 
PURCHASE ORDERS, ADVERTISING OR OTHER REPRESENTA- 
TIONS BY ANYONE, AND MAY ONLY BE MODIFIED BY A WRITTEN 
AMENDMENT EXECUTED BY YOU AND AN AUTHORISED 
OFFICER OF DRI AND AMSTRAD. 

YOU ACKNOWLEDGE THAT YOU HAVE READ THIS AGREEMENT, 
UNDERSTAND IT AND AGREE TO BE BOUND BY ITS TERMS AND 
CONDITIONS. YOU FURTHER AGREE THAT IT IS THE COMPLETE 
AND EXCLUSIVE STATEMENT OF THE AGREEMENT BETWEEN 
YOU AND DRI AND AMSTRAD WHICH SUPERSEDES ANY PRO- 
POSAL OR PRIOR AGREEMENT, ORAL OR WRITTEN, AND ANY 
COMMUNICATIONS BETWEEN YOU AND DRI OR AMSTRAD 
RELATING TO THE SUBJECT MATTER OF THIS AGREEMENT. 

THIS AGREEMENT DOES NOT AFFECT YOUR STATUTORY 
RIGHTS. 
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Appendix 2 
Glossary of Terms 



Some commonly used terms from the world of computing, 
explained for CPC664 users.... 



Accumulator 

A memory location within the microprocessor circuit at the ' heart of the 
microcomputer that stores data temporarily while it is being processed. Used 
extensively in machine code programming - BASIC users need never know it exists! 

Acoustic coupler 

Also known as an Acoustic Modem. An electronic attachment for a computer that 
connects a telephone handset to the computer and enables the latter to communicate 
over the normal voice telephone network. In this way, a computer can communicate 
with public information systems such as PRESTEL, and with other users of home 
computers, in order to exchange software, get data and information etc. 

Address 

The number in an instruction that identifies the location of a 'cell' in a computer's 
memory. By means of its address, a particular memory location can be selected so 
that its contents can be found and 'read', in the case of RAM, both written and read. 

Adventure game 

A cult with some, and a bore to others. A text-based computer game in which the 
player is invited to participate in a series of pseudo random events based on trying to 
find a way around a maze or labyrinth. 

Algorithm 

A grandiose name for a complicated formula or sum. A sequence of logical and 
arithmetic steps to perform a defined task in computing. 

Alphanumeric 

The attribute that describes the difference between a letter or number and a graphics 

character. 
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ALU 

Arithmetic Logic Unit. The part of a microprocessor that carries out arithmetic and 
logical operations - not of direct concern except in machine code programming. 

Ambiguous File Name 

A file name containing one or more wildcard characters. Ambiguous filenames refer 
to more than one specific file name and are used to refer to one or more files at a time. 

AMSDOS 

AMStrad Disc Operating System, The program that allows Locomotive BASIC to 

access disc files. 

AMSOFT 

AMSTRAD's specialist computer support division, supplying software, peripherals, 
publications, specifically to enhance the CPC664 and its many applications. 

A/D 
Analogue 

A state where change between a start and finish point occurs gradually rather than 
instantaneously. Computers are digital devices - most of the natural world is based 
on analogue principles, thus the computer has to perform an analogue to digital (A/D) 
conversion before it can process data from an analogue source. 

Animation 

Cartoons are the best known form of animation - computer animation is based on the 
concept of moving graphics to simulate the idea of live' movement. 

Applications program 

A program with a specific task rather than a general purpose software tool' such as 
an assembler, printer driver etc. 

Arcade Game 

The type of moving action computer video game where for example, spacemen invade 
and are vanquished, or insatiable monsters chase around a maze and gobble up the 
unwary. Figures under the control of the user have to avoid all manner of unpleasant 
'deaths'. Generally good for the reflexes but of little educational benefit for the 
computer student. 
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Architecture 

The plan relationship of the databus, peripheral and CPU handling aspects of a 
microcomputer. 

Argument 

An independent variable, e.g. in the expression x+y=z, the terms x, y, and z are the 

arguments. 

Array 

A 2 dimensional matrix (grid) in which data is stored by addressing with the 
Tiorizontal' and 'vertical' co-ordinates. 

Artificial intelligence AI 

A structure in program techniques that enables the program to learn from its past 
experience. 

ASCII 

American Standard Code for Information Interchange. A commonly used way of 
representing the numbers, letters and other symbols that can be entered from the 
computer's keyboard or invoked using a variety of other commands. 

Assembler 

The practical method for programming in machine code, where the machine code 
instructions are invoked by mnemonics (letters that suggest the function being 
performed by the corresponding machine code routine). 

Backup 

A duplicate copy of information used as a safeguard in case the original is lost or 
accidentally damaged. Making a backup refers to the process of duplicating a disc or 
disc file. 

Barcode 

A computer readable printed code that can be read by optical techniques such as 
scanning by a low power laser. Look at the bottom of a box of soap powder to see an 
example. 
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Base 

The prime numeric consideration of any mathematician. The basis of any system of 
number representation. The binary system has base 2; the decimal system has base 
10, and the hexadecimal system has the base 16. 

BASIC 

Beginners' All-purpose Symbolic Instruction Code. An interpretive programming 
language used in almost all home computers. BASIC was specifically designed to be 
easy to learn and simple to use since it allows for programs to be 'glued' together and 
tested at any point in their development; as opposed to compiled types where the 
complete program must be run before any aspect can be properly tested. 

Baud 

A bit per second. The unit for measuring the rate at which digital data is transmitted 
in serial communication systems. 

BCD 

Binary Coded Decimal. A coding system for decimal numbers in which each digit is 
represented by a group of four binary digits. 

BDOS 

Basic Disc Operating System. This is the part of the CP/M operating system which 
provides an interface for a user program to use the functions of CP/M. 

Benchmark 

A standard task that can be given to different computers to compare their speed, 
efficiency and accuracy, e.g. calculating the square root of 99.999 squared. 

Binary 

The number system with base 2, in which all numbers are made up from the two 
binary digits and 1 . (See part 1 of the chapter entitled 'At your leisure. . . , '.) 

Binary number 

A number represented in binary notation. Signified in CPC664 programming by the 
prefix &X. e.g. &X0101 = (decimal) 5. 
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BIOS 

Basic Input/Output System. This is the hardware dependent part of CP/M that is 
written specifically for one type of computer. All the input and output to the screen, 
keyboard, disc and so on is performed through the BIOS. 

Bit 

Shortform of Binary digiT. A binary digit is one of the two digits, represented by 
and 1 , that are used in the binary number system. 

Bit Significant 

Where the information contained in a number is extracted by considering the state of 
each of the eight bits that make up the complete byte. The overall decimal value may 
have no meaning. 

Boot 

The process of loading an operating system into memory. When CP/M is started from 
BASIC a small boot program is loaded automatically from the disc, which then loads 
the rest of the operating system into memory. 

Booting or Bootstrapping 

Programs and operating systems don't load themselves, they are 'bootstrapped' by a 
small routine in ROM (usually), that initiates the loading processes at a specific 
location in memory. 

Boolean algebra 

Is the statement of logical relationships where there can only be two answers; true or 
false. Usually signified as or 1. 

Buffer 

An area of memory reserved for temporarily storing, or buffering, information during 
an information transfer. 

Bug 

A problem on a scale ranging from an 'unexpected feature' based on some obscure 
aspect of the use of a program (e.g. if you press four keys at once, the screen changes 
colour), to a sequence that completely and irrevokably crashes a computer program 
and wipes the memory clean of all data. 
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Built-in commands 

Commands that are part of an operating system. They are always quicker than 
transient commands because they are not accessed from disc. 

Bus 

A group of connections either within the computer, or connecting it to the outside 
world that carries information on the state of the CPU, the RAM and other hardware 
features. The CPC664 bus is presented on the circuit board connector marked 
EXPANSION, at the rear of the computer. 

Byte 

A group of eight bits, which forms the smallest portion of memory that an 8-bit CPU 
can recall from, or store in memory. 

CAD 

Computer Aided Design. Usually an interaction of computing power and graphics to 
provide an electronic drawing board, although any calculation performed on a 
computer in pursuance of a 'design' comes under the heading of CAD, 

CAE 

Computer Aided Education. Further nourishment for the buzzphrases of computing. 
The use of the computer to help with education. CAI (Computer Aided Instruction) 
and C AL (Computer Aided Learning) are two aspects of CAE. 

Cartridge 

A specially packaged memory integrated circuit containing software which can be 
plugged directly into a socket specifically provided for the purpose on the computer. 
Cartridge software loads and runs quickly and easily, but costs considerably more 
than software supplied on disc. 

Cassette 

Apart from the obvious recording tape variety, a generic term that encompasses a 
variety of 'packages' - including ROM software etc. 
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CCP 

Console Command Processor. This is a module of CP/M that interprets and executes 
user input from the keyboard, Usually commands are input which the CCP loads and 
executes. 

Character 

Any symbol that can be represented in a computer and displayed by it, including 
letters, numbers and graphics symbols. 

Character set 

All the letters, numbers and symbols available on a computer or printer. The fact that 
a character exists on a computer does not imply it is accessible on any printer. 

Character string 

A piece of <variable> data comprising a sequence of characters that can be stored or 
manipulated as a single unit, e.g. a word or a collection of words. 

Chip 

A misleading but popular reference to any form of monolithic electronic integrated 
circuit. The 'chip' is actually a small slice of specially processed silicon material, on 
which the circuit is fabricated. 

Clock 

The reference timing system in the computer used to synchronise and schedule the 
operations of the computer. A real time clock is one that maintains the hour, date etc. 

Code 

Apart from the more literal implications, frequently used by programmers as an 
abbreviation of 'machine code'. 

Cold start 

The process of booting and initialising an operating system. A cold start of CP/M is 
performed when the I CPH command is used. 

Command 

A programming instruction. 
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Compiler 

A complex program that converts complete programs written in a high level 
interpretive languages like BASIC into the direct instruction code of the 
microprocessor, thereby enabling operation at much greater speeds. 

Computer generations 

Technological landmarks have delineated several distinct steps in computer 
technology, and the groupings within these various strata are known as the 
'generations' of design technologies. 

Computer literacy 

Another grandiose expression meaning understanding computers. 

Console mode 

CP/M direct mode; the A > appears on the screen, and the system awaits input of a 
CP/M or utility command. 

Corruption 

The destruction or alteration of the contents of a disc file or memory, in an 
undesirable and potentially unrecoverable manner. 

CP/M 

Control Program for Microcomputers. A disc based operating system by Digital 
Research that provides a standard systems interface to software written for a wide 
range of microprocessor based computer systems. 

CPU 

Central Processing Unit. The component at the heart of any computer system that 
interprets instructions to the computer and causes them to be obeyed, in a 
microcomputer, the CPU is the microprocessor device itself. 

Cursor 

A movable marker, indicating where the next character is to appear on the screen. 
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Cursor control keys 

Keys that move the Cursor around the screen, and are frequently used to control the 
direction of action in arcade games, indicated by arrows printed on the top. 

Daisy-wheel printer 

A printer that can produce high quality or 'typewriter quality' documents. Printed 
characters are created by the impact of letters against the ink or film ribbon. 

Database 

An array of any type of data in a variety of computer addressable formats. 

Data capture 

The term which describes the collection of data from any outside sources that are 
linked in some way to a central computer. 

Debugging 

The process of fixing the bugs in a program by a combination of 'suck it and see' and 
more scientific methods, 

Decimal notation 

Also known as the Denary system, for numbers with base 10, using the digits to 9, 
representing numbers of units, tens, hundreds, thousands and so on. 

Default 

The value assumed in the absence of any user output. For example, when CP/M is 
started Drive A : isassumedtobethedefaultdrive. 

Delimiter 

(See Separator) 

Diagnostic 

A message automatically produced by a computer to indicate and identify an error in 
a program. 
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Digital 

Describes the transition of a changing quantity in terms of discrete steps rather than 
by a continuous process. The opposite of analogue. 

Digitiser 

A means of plotting analogue information into a computer. Commonly referred to in 
conjunction with graphics tablets. 

Directory 

A section of disc containing entries for each file on the disc. A list of the contents of a 
disc. 

Disc (or disk) 

A flat, thin circular piece of plastic, coated on one or both sides with a magnetic oxide 
surface and used as a medium for storing data. The disk is housed in a protective 
envelope, with access for the reading head provided by a 'window'. On a 3" disc the 
window is covered by a metallic shutter, which automatically slides across when the 
disc is out of the disc drive. 

Disc drive 

The mechanisms used to spin and access the data on the surface of the disc. 
Documentation 

The manuals that are supplied with computers or software to explain how they are 
operated. 

DOS 

Disc Operating System. The software that controls all the operations of a disc drive. 

Dot matrix 

A rectangular grid of dots on which a character can be displayed by the selection of 
certain dots. 

Double sided 

A disc that can store information on both sides. A double sided disc drive can access 
both sides of a disc without the need to change the disc over. 
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Download 

The transfer of information from one computer to another - the computer receiving 
the data is generally referred to as the machine downloading. The other end of the 
link is uploading. 

Dr. LOGO 

Digital Research's version of LOGO, a programming language with a graphics turtle. 

Dumb terminal 

A computer terminal that simply acts as a medium for input and output without any 
processing of the information passing through. Note that a mindless terminal is one 
where even the display drive electronics are absent, and that the screen display 
information is fed in as pure video. 

Edit 

To correct or make changes to data, a program or text. 

Editor 

A program that is usually in the ROM of the computer, which enables the editing 
process to be carried out. 

EPROM 

Erasable Programmable Read only Memory. Similar to the PROM, except that the 
data contained in the chip can be erased by ultra-violet light, and new program 
recorded. An EEPROM is similar, except that it may be electronically erased. 

Expression 

A simple or complex formula used within a program to perform a calculation on data 
-the expression will usually define the nature of the data it can handle. In Dr.Logo an 
expression consists of a procedure name followed by any necessary inputs to the 
procedure. 

Fifth generation computers 

Mainly large mainframe computers that are promised to arrive with the ability for 
•self-programming using the developments of artificial intelligence. 
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File 

A collection of data, generally stored on cassette or disc. 
Filename 

The name of a file. In Dr.Logo a file name can consist of up to 8 alphabetic or numeric 
characters. In CP/M an additional three character file type, preceded by a dot . is 
allowed. 

Firmware 

Software contained in ROM - a cross between pure software and pure hardware. 

Fixed-point number 

A number represented, manipulated and stored with the decimal point in a fixed 
specified position. 

Floating-point number 

A Real number, manipulated and stored with its decimal point permitted to settle in 
the required position. The method is particularly useful when dealing with large 

numbers. 

Floppy disc 

(See Disc) 

Flowchart 

A diagrammatic representation of the progression of program steps and logical 
processes tracing the sequence of events during program execution. 

Forth 

A high speed programming language, with speed and complexity falling between a 
High-level language and Machine code. Not a beginners' language. 

Function key 

A key on the keyboard that has been assigned a specific task - which it may execute in 
addition to, or instead of the main purpose inscribed upon that key. 
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Gate 

Logical gates permit the passage of data when certain conditions are fulfilled. There 
are many different types of gate (OR, AND, XOR etc). 

Graphics 

The part of the screen display of the computer that is not related to the display of 
'characters'. Graphics encompasses the drawing and plotting of lines, circles, 
patterns, etc. 

Graphics character 

A shape or pattern specially designed to be useful in creating images. 

Graphics cursor 

Similar to the text cursor, but addressing the graphics screen. An invisible concept on 
the CPC664 - but nevertheless an indispensible facility for locating drawn graphics. 
Not to be confused with graphics characters which are still part of the 'character set', 
and are printed at the text cursor. 

Graphics mode 

Early microcomputers required to be specifically set to either handle characters or 
graphics. Modern personal computers are capable of mingling text and graphics 
simultaneously. 

Graphics tablet 

A device that plots the co-ordinate points of a given picture or drawing for 
manipulation within the computer. A form of A/D. 

Handshaking 

A sequence of electronic signals which initiates, checks and synchronises the 
exchange of data between a computer and a peripheral, or between two computers. 

Hard Copy 

Paper print-out of a program or other text - or of a graphics display. The transitory 
screen equivalent is known as 'soft copy'. 
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Hardware 

The electronic and mechanical parts of a computer system - anything that isn't 
software or firmware. 

Hexadecimal (or HEX) 

The number system with base 16. Hexadecimal numbers are signified in CPC664 
programming by the prefix & or &H. e.g. &FF = (decimal) 255. (See part 1 of the 
chapter entitled 'At your leisure....'.) 

Hex file 

An ASCII representation of a command or machine code file, 

High-level language 

Languages like BASIC, which are written in 'near literal' form, where the actual 
language does most of the work of interpreting. Slower than machine code orientated 
programs, but far simpler to understand. 

IEEE-488 

One of the standard Interfaces for connecting devices to a microcomputer. Similar to 
- but not wholly compatible with - the Centronics parallel interface. 

Information technology 

Anything relating to the use of electronics in the processing of information and 
communications: wordprocessing, data communications, PRESTEL, etc. 

Initialise 

Switch on a system, or declare specific values for variables before beginning to 
execute the body of program - e.g. dimensioning arrays, declaring variables to be 
integers, etc. 

Input 

Anything that enters the computer memory from its keyboard, disc unit, serial 
interface or other input source. 

Instruction 

A request/command to a computer to perform a particular operation. A collection or 
sequence of instructions form a program. 
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Instruction set 

The prime logical and mathematical processes carried out by the microprocessor. 
Every high level instruction (including assembler mnemonics) have to be capable of 
being distilled down to an instruction that is recognised by the computer CPU. A 
single high level command may invoke a large number of elements from the CPU's 
instruction set. 



Integer 

A whole number with no decimal point. 

Integer number 

A number with no fractional part, i.e. a number with no part to the right of the 
decimal point - as opposed to a real number which is the integer part plus the 
fractional part. 

Integrated circuit 

A collection of electronic circuit components miniaturised and built onto a single 
piece of silicon. (See also Chip) 

Intelligent terminal 

A terminal where as well as handling the requirements of the computer's input and 
output, local processing power is also available when the terminal is 'offline'. 

Interactive 

Usually a reference to programs where the hardware computer prompts the user to 
provide various types of input - ranging from controlling the spaceship in an arcade 
game, to answering questions in educational programs. The action of the user has an 
effect in 'real time' on the behaviour of the program. 

Interface 

The way in and out of a computer, both in electrical and human terms. The CPC664 
interface is the keyboard (input), and the screen (output) - as well as the facility for 
the connection of user peripherals to the various sockets. 
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Interpreter 

A further extension of the analogy of computer instruction sets and language. The 
element of the system software that interprets the high level language to the level 
that can be understood by the CPU. e.g It converts BASIC code as entered via the 
keyboard into the computer's own internal language. 

I/O 

Input/Output. 

Iteration 

One of the elements of computing. The computer performs all tasks by breaking them 
down into the simple tasks that can be handled by the CPU. To do this, the computer 
must go to and fro' between many simple elements until a given condition is fulfilled. 

Joystick 

An input device that generally replaces the function of the cursor keys, and makes 
games playingfaster and easier. 

K 

A short form of the metric measure prefix for 1000, *kilo' - which in computing has 
come to be widely used to refer to a 'kilobyte' - which is actually 1024 (decimal) in 
view of the binary association of 2 raised to the power of 10. 

Keyboard 

The matrix of alphanumeric key switches, arranged to provide the means of typing 
commands and other information into the computer. 



Keyword 

A word whose use in the computer program or language is reserved for a specific 
function or command. 

Least significant bit 

In a binary number, the Least Significant Bit (LSB) is the bit at the extreme right 
hand end of the expression. 
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light Pen 

Another alternative input method, using a pen or 'wand'. 

Line number 

BASIC and some other languages use programs that are arranged in line number 
order. 

Lisp 

The acronym formed from LISt Processor language. Another high level computer 
language. 

Logic 

The electronic components that carry out the elementary logical operations and 
functions, from which every operation of a computer is ultimately built up. 

Logical device 

The representation of a device that may be different to its physical form. For example 
the CP/M logical device L S T may be assigned to the Centronics port or perhaps the 
VDU. 

LOGO 

The name of a programming language derived from the Greek word logos, which 
means word. Logo is designed to teach the fundamentals of computer programming, 

Loop 

A process in a program that is executed repeatedly by the computer until a certain 
condition is satisfied. 

Low-level language 

Such as 'assembly language'. A programming language in which each instruction 
corresponds to the computer's machine code instruction, 

LSI 

Large Scale Integration, The development of integrated circuits, packing more 
functions onto ever smaller pieces of silicon. 
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Machine Code 

The programming language that is directly understood by a microprocessor, since all 
its commands are represented by patterns of binary digits. 

Machine readable 

A medium of data or any other information that can be immediately input to a 
computer without additional work on keyboarding etc. 

Man-machine interface 

A point of interaction between the computer and the operator: keyboard, screen, 
sound etc. 

Matrix 

The arrangement of the dots that form the character cell on the screen, or on the print 
head of a 'dot matrix' printer. Also a term used in mathematics and computer science 
to encompass arrays. 

Memory 

The computer's parking lot for information and data, neatly arranged in logical rows 
with each item individually accessible. Either known as RAM (random access 
memory) where information can be both stored and retrieved, or ROM, where the 
information may be read, but not re-written in another form. Discs and tape are 
examples of 'bulk memory', although the term has evolved to mean the memory that 
is directly addressed by the CPU. 

Memory map 

The layout of the memory, showing the various addresses, and the allocation of the 
memory to specific functions, such as the screen, the disc operating system etc. 

Menu 

A bill of fare of the different options that may be carried out by the program in the 
computer, left to the user to select. 

Microprocessor 

An integrated circuit that sits at the heart of a microcomputer and executes the 
instructions that are presented to it by the BASIC intepreter, in order to control the 
various output devices and options. 
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Modem 

A MOdulator DEModulator that connects the computer's I/O to a telephone line or 
other serial data transmission medium - including fibre optics. (See also Acoustic 
coupler) 

Monitor 

The screen section of a computer terminal system, and also a term describing a 
machine language program that provides access to the fundamental machine 
operation of the computer. 

Mouse 

An upside-down 'tracker' or 'roller ball'. Pushed around a table top by hand, a mouse 
is generally used to move a cursor around the screen. Originally designed to 
overcome the fear of keyboards and make software appear more 'user friendly'. 

MSB 

The Most Significant Bit of a binary number, i.e. the bit at the left end of the binary 
expression. 

Network 

When two or more computers are linked together to exchange data and information 
- either by wiring, or via MODEMs. 

Nibble 

Half a byte: a four bit expression. Each of the hexadecimal digits in the expression 
&F6 represents 'one nibble'. 

Node 

A unit of storage in the LOGO workspace. Typically one node consumes 4 bytes of 
memory space. 

Noise 

The CPC664 sound facilities include the ability to inject a variable amount of random 
noise to create effects such as explosions. 
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Numeric keypad 

The area on the keyboard where number keys are grouped to facilitate entry of 
numeric data, and in the case of the CPC664, to provide the additional facility of user 
definable function keys. 

OCR 

Optical Character Recognition. A means of reading printed or written characters 
with an optical reader and translating them directly into computer readable data. 

Octal 

A number system to the base of 8, where each digit (0-7) is constructed from three 
Bits. 

Offline 

A computer peripheral - usually a display terminal or a printer - that is not actively 
connected to, or accessible by, the main processing unit. 

Online 

The opposite of Off line. 

Operating system 

The attendant in the 'parking lot' referred to under the entry for Memory. Software 
that allocates precedence and timing to the operations of the computer. 

Output 

Anything that comes from a computer as the result of some computational function. 

Operator 

The part of arithmetic expression that causes one number to operate on another, e.g. 
+ - * / etc. 

Overwrite 

Erase an area of memory by replacing its contents with new data. 
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Paddle 

An alternative name for a joystick. Also referred to as a 'games paddle'. 

Page zero 

This refers to the region of memory in a CP/M environment between &0000 and 
&0100 which is used to hold vital system parameters. 

Paperware 

Another description for the printed 'hardcopy' of computing. Occasionally computers 
launched before they have actually finished development are described as a 
'paperware exercise'. 

Parallel interface 

The CPC664 printer interface supports a parallel printer: which means that each 
data line from the bus is connected to a corresponding input on the printer. Data is 
transferred many times more quickly using a parallel interface than it is through a 
serial interface, since the serial interface must first format each byte, and frame it 
with synchronisation information. 

Pascal 

A high-level structured programming language that must be compiled before it will 
execute - and therefore runs very quickly. Generally the next language that the keen 
BASIC student will pursue. 

PEEK 

The BASIC function that looks directly into the computer's memory, and reports the 
value at the specified location. 

Peripheral 

Printers, modems, joysticks, cassette units - anything that plugs into the computer to 
expand its capabilities. 

Physical device 

An actual device, consisting of hardware, that exists. Physical devices may be 
represented by logical devices. 
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Pixel 

The smallest accessible area of the screen that can be controlled by the hardware. 

Plotter 

A specific type of printer that draws 'longhand' using pens rather than an impact 
print head. Used for technical and graphical drawing output. 

POKE 

The statement in BASIC that is used to place a value in a specified memory location. 

Port 

A specifically addressable point on the interface for input or output of data. 

Portability 

Other than the literal use, means the ability for software to operate on different 
makes of computer - usually as a result of a compatible operating system, such as 
Digital Research's CP/M. 

Primitives 

Procedures, operations or commands that make up Dr.Logo; the built-in procedures. 

Printer 

Any hardcopy method for printing out text. 

Procedure 

A series of expressions or program statements that dictate how to perform a 
particular task, 

Program 

A combination of instructions that cause the computer to execute a task. It can be 
anything from a simple machine code 'routine' to a complete applications program, 
such as a wordprocessor. 
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Programming language 

The medium through which the program is written, being comprised of rigid rules on 
the use of words, numbers and the sequence in which they are implemented. 

PROM 

Programmable Read Only Memory. An integrated memory circuit that once written 
with data, cannot be erased. (See also EPROM) 

Prompt 

A short message or character sequence reminding the user that some type of input is 
expected. For example, the CP/M prompt is the > and the Dr.Logo prompt is the ? 
character. 



PSU 

Power Supply Unit. The means of converting the domestic mains electricity supply 
into the necesBary voltages to operate the computer (and peripheral devices). 

QWERTY keyboard 

The colloquial term to describe a keyboard with the conventional UK or US 
typewriter key layout. 

RAM 

Random Access Memory. Memory that may be both read from, and written to, using 
the internal circuitry of the computer during the normal course of program 
execution. 



Random access 

The ability to read and write information in memory or on a disc in any desired order. 

Random number 

A number that is generated by the computer program that is neither repeatable, not 
predictable. The CPC664 is capable of generating a pseudo random number 
sequence. 
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Raster 

A system of 'writing' on the screen where the images are built from a number of 
horizontal scan lines. (Raster scan). 

Read only R/O 

An attribute assigned to a disc, a disc file or a disc drive that prevents writing or 
changing of data. 

Read write R/W 

An attribute assigned to a disc, a disc file or a disc drive that allows both reading and 
writing of data. 

Real number 

A number that has both integer and fractional parts, i.e. both sides of the decimal 
point are used. 

Realtime 

Events that occur before your eyes, as opposed to those which only become evident 
after the termination of the process that produced them. 

Record 

A group of bytes in a file. CP/M uses 128 byte records. 

Recursion 

The series of repeated steps (also sometimes imprecisely described as reciprocation) 
within a program or routine in which the result of each repeated cycle of events is 
related to the previous one. 

Refresh 

To update information, either on the screen of a VDU, or in the memory. Need not be a 
destructive process, but merely reinforcing whatever was already present in memory 
or on the screen. 

Register 

A transient memory location within the CPU that is used for temporary storage. 
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Remark 

A non-executing statement in a program that is included to remind the programmer 
what part of the program he is doing, and to date and time stamp that particular 

'edition'. 

Reserved word 

A word which has particular significance to the computer program, and cannot be 
used other than in its pre-defined context. For example, BASIC will not accept the 
word N E W as a variable - it is already 'reserved' for another purpose. 

Resolution 

The ability to determine where one element of the display ends, and the next one 
begins. Also loosely applied to the ability of a computer to perform arithmetic 
manipulations on large numbers. 

Reverse Polish notation 

(RPN) A method of describing arithmetic operations favoured by some calculator 
manufacturers, where the operators (+,-,*,/) are placed behind the values to which 
they apply. 

RF Modulator 

The means by which the video signals from the computer are encoded and 
'transmitted' to the aerial of a standard TV set. 



ROM 

Read Only Memory. Generally with reference to semiconductor memory systems: 
once written, neither erasable, nor re- writable. 

Routine 

A part of the program that performs a 'routine' task. A 'sub' program that resides 
either within a main program, or may exist as a separate module for incorporation 
into a variety of applications programs, e.g. A program to derive a 12 hour display 
from the system's clock may be considered as a routine. 
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RS232C 

A specific standard for serial data communications interfaces. Devices at both ends of 
the data link using an RS232 interface require to be 'configured' to the particular 
conditions of the RS232 data standard used. Compare this with the Centronics 
parallel interface where the interconnection is virtually standard everywhere. 

Screen Editor 

A text or program editor where the cursor may be taken to any part of the screen 
display in order to alter the characters appearing there. 

Scrolling 

The term describing the way in which the screen display 'rolls up' when the display 
fills up to the bottom, and needs to make space for the next line of entry or output to 
appear. 

Sector 

A block of data on a disc. The AMSTRAD disc system useB a sector size of 512 bytes. 

Separator 

A separator performs the same function as a delimiter, i.e. marking the boundary 
between reserved words and other elements of the program or data. 

Serial interface 

Although this term nearly always refers to an RS232 interface, other serial 
standards exist for the sequential transmission of computer data. 

Simulation 

A technique for emulation of real life interactive processes using the computer, such 
as flight simulation, driving simulation etc. 

Single sided 

Refers to a disc which has only one side available for data storage. 



Soft key 

(See UDK - user defined key) 
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Software 

Programs themselves. May be based on disc, cassette, ROM, etc. 

Software engineering 

A grandiose expression meaning computer programming, implying a structured and 
considered approach, as opposed to arbitrary techniques. 

Sound generator 

The part of a computer (it may be either hardware or software) that creates the sound 
and noise. 

Speech recognition 

The conversion of the spoken word into machine readable instructions. 

Speech synthesis 

Generation of simulated speech using a combination of hardware and software. 

Spreadsheet 

A program that allows rows and columns of numbers to be entered and arithmetically 
manipulated. Changing one entry causes all the associated calculations to be re-run, 
and produces an updated result. 

Sprite 

A screen character that moves freely around the display, generated by specific 
hardware or software that allows it to appear and disappear apparently at random. 

Stack 

An area of memory allocated for 'stacking' information, but where only the last entry 
on the stack can be recalled. 

Statement 

An instruction, or sequence of instructions, in a computer program. 
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Stream 

The route used for the output from the computer, e.g. the screen, the printer, or the 
disc. 

String 

A type of data comprising an assortment of characters that may not be treated as a 
numeric variable. It may be purely numeric, but it is not treated as such unless 
specifically converted to a corresponding numeric variable by the appropriate 
command. 

Structured programming 

A logical and premeditated programming technique that results in programs that 
flow from 'top to bottom', with clearly described steps. 

Sub-routine 

(See routine) 

Syntax error 

When the rules of the program are broken by the incorrect use of keywords and 
variables, BASIC will prompt the user with this message. 

System tracks 

Tracks reserved on the disc for the CP/M system. 

Terminal 

A keyboard input device, with either a VDU screen or teletype typewriter output 
system. 

TPA 

Transient Program Area. An area in memory commencing at &0100 where CP/M 
user programs run and store data. 

Track 

Tracks are concentric rings on a disc. Each track holds a fixed number of sectors. The 
tracks and sectors are written to a specific area of a disc during formatting. 
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Transient program 

A CP/M utility program such as FILECOPY, which can be loaded into the TPA and 
run by typing its name at the keyboard. 

Truncated 

A number or string that has been shortened by removal of leading or trailing 
characters. Where intentional, the process may involve rounding the value. Where 
unintentional, the extra characters are simply discarded to enable the number or 
string to fit the available space . 

Truth table 

The results of a logical operation are either 'true' or 'false'. The computer interprets 
these as being either 1 or 0, and the truth table lists the possible results of a logical 
operation (IFA>BTHENC) accordingly. 

Turnkey 

A word used to describe a program which executes automatically when the system is 
booted. The Dr.Logo disc is an example of a turnkey program. 

Turtle 

A graphic symbol, in the shape of an arrow head, that functions as a graphic cursor on 
the Dr.Logo graphic screen. 

Turtle graphics 

The graphics image left on the screen by the movement of a turtle. As the turtle 
moves it leaves a trace of its path on the screen. 

Turtle step 

The smallest distance a turtle can move. Normally one pixel. 

UDK 

User defined keys. The CPC664 has up to 32 keys which may be redefined to perform 
a variety of tasks. 

Unsigned number 

A number with no prefix to signify whether its value is positive or negative. 
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Utility 

Any complete program used to perform a common operation, such as Borting data or 
copying files. 

Utility program 

A program on disc that enables the user to perform certain operations. (See Transient 
program) 

Variable 

An item included in a computer program that can be identified by name, hut whose 
actual value may be made to vary during the execution of a program. 

Warm start 

This is performed when [CTRLJC is pressed during CP/M. A warm start reinitialises 
the disc sub-system and returns control to CP/M ready for commands to be entered. 

Wildcard character 

Either of the characters * or ? . Dr.Logo only supports the ? character. The * ' 

wildcard character simply means any number of ? s. When referencing files wildcard 
characters are used to make up an ambiguous file name. Any ?s in the file name refer 
to any alphabetic or numeric character. , 

Write protection 

A safeguard used to prevent re-writing of a disc or disc file. A write protected disc or 
file is Read Only. 

XYZY 

A magic word to get out of sticky corners in adventure games. 
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Appendix 3 

Some Programs For You.... 



Telly tennis 

The one that started it all, but still great fun! For two players, or one player against 
the computer. Keyboard or Joystick(s). 



10 'TELLY TENNIS by DAVID RADISIC 

20 'copyright Cc) AMSOFT 1985 

30 ' 

40 DEFINT a-z 

50 comp=1 

60 ENV 1, = 11, 20, =9, 5000 

70 MODE 1:INK 0,10:BORDER 10:INK 1,26:INK 2,18: INK 3,0 

80 GOSUB 710 

90 GOSUB 150 

100 GOSUB 330 

110 GOSUB 420 

120 LOCATE 13,1:PRINT USING"M#tf ";score1; 

130 LOCATE 35,1:PRINT USING"#### ";score2; 

140 GOTO 100 

150 PEN 2 

160 x(1)=3:y(1)=5 

170 x(2)=37:y(2)=22 

180 edge$=CHR$(233):edge2$=STRING$(2,207) 

190 LOCATE 1,3:PRINT STRING$(39,edge$) : PRINT STRINGSC39 

,edge$) 
200 FOR i=1 TO 19 
210 PRINT edge2$;TAB(38);edge2$ 
220 NEXT 

230 PRINT STRING$(39,edge$):PRINT STRINGS (39, edge$) ; 
240 WINDOW #1,3,37,5,23 
250 CLS/M 

260 SYMBOL 240,0,60,126,126,126,126,60,0 
270 bat$ = "l ,, + CHR$C8)+CHR$(10) + "l" 
280 cLr$=" M +CHR$(8)+CHR$(10)+" " 
290 baLL$=CHR$(240) 
300 PEN 3 
310 LOCATE 2,1:PRINT"Player 1 : 0"; : LOCATE .24,1 : PRIN 

T"Player 2 : 0"; 



320 RETURN 
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330 n=INT(RND*2) :CLS #1:scored=0 

340 PEN 3 < 

350 FOR i=1 TO 2:LOCATE x C i ) ,y< i ): PRINT bat$;:NEXT 

360 ON n GOTO 390 

370 xb = 21 :dx = 1 

380 GOTO 400 

390 xb=19:dx=-1 i 

400 yb=12:dy=INT(RND*3)-1 

410 RETURN 

420 GOSUB 600 

430 oxb = xb : oyb = yb 

440 GOSUB 500 1 

450 IF note>0 THEN SOUND 1 29,not e,50, 1 5, 1 

460 LOCATE oxb,oyb: PRINT" "; 1 

470 LOCATE xb,yb:PRINT baLLS 

480 IF scored=0 THEN 420 

490 RETURN 

500 LOCATE xb+dx,yb+dy:ch$=COPYCHR$(#0) 

510 note=0 I 

520 IF ch$=" " THEN xb=xb+dx :yb=yb+dy : RETURN 

530 IF ch$="l" THEN dx=2-dx-2 : dy=INT C RMD*3)-1 : not e=200 : 

RETURN 
540 IF ch$=LEFT$(edge2$ / 1) THEN 570 
550 IF ch$=edge$ THEN dy=2-dy-2 : note=250 1 

560 RETURN 

570 IF dx>0 THEN score1=score1 +1 ELSE score2=score2+1 
580 scored = 1 :note = 2000 
590 RETURN 
600 pC1)=(INKEYC69)>=0)+(INKEYC72)>=0)+ABSCCINKEYC71)>= ' 

0)+(INKEY(73>>=0))*2 
610 IF comp=1 THEN p C2)=ABS Cy (2)<yb)*2+(y (2)>yb) : GOTO 6 

30 
620 p(2)=(INKEY(4)>=0)+(INKEY(48)>=0)+ABS((INKEY(5>>=0) 

+(INKEY(49)>=0))*2 I 

630 PEN 3 
640 FOR i=1 TO 2 

650 LOCATE x ( i > ,y ( i ) +p( i ) : chS=COPYCHR$(#0) , 

660 IF ch$ = " " THEN LOCATE x C i ) ,y C i ): PRINT cLr$;:y(i) = y 

(i)+R0UND(p(i)/2) t 

670 LOCATE x ( i ) ,y ( i ): PRINT bat$; 

680 NEXT 1 

690 PEN 1 , 

700 RETURN 
710 PEN 2:PRINT:PRINT TABC 1 5 ) "Pi rig-Pong" : PRINT TABC15)" 1 
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720 PEN 3:PRINT:PRINT TA8(14)"To move bats : 

730 PRINT:PRINT:PEN 1 

740 PRINT" Player 1 Player 2 Di recti on" : PRI 

NT 

750 PRINT" A 6 UP" 

760 PRINT" Z 3 D0WN":PR1NT 

770 PEN 3:PRINT:PRINT TAB(14)"0r joysticks" 

780 PRINT:PRINT:PRINT:PRINT 

790 PEN 2 

800 PRINT TAB(6)"SeLect <1> or <2> players" 

810 i$=INKEY$:IF i$<>"1" AND i$<>"2" THEN 810, 

820 IF i$="1" THEN comp=1 ELSE comp=0 

830 MODE 1:RETURN 



Electric fencing 

Try to 'foil' your opponent! For two players only. Keyboard or Joysticks. 



10 'ELECTRIC FENCING by ALEXANDER MARTIN 

20 'copyright Cc) AMSOFT 1985 

30 ' 

40 DEFINT a-z 

50 MODE 

60 GOSUB 980 

70 GOSUB 1370 

80 GOSUB 270 

90 GOSUB 1520 

100 GOSUB 1370 

110 GOSUB 1270 

120 ' 

130 ' 

140 REM start 

150 IF finished THEN GOTO 100 

160 GOSUB 240 

170 FRAME:IF pldir THEN GOSUB 570 ELSE FRAME:FRAKE 

180 FRAME:IF p2di r THEN GOSUB 620 ELSE FRAME:FRAME 

190 IF p1sa=-1 THEN GOSUB 670 

200 IF p2sa=-1 THEN GOSUB 720 

210 GOTO 140 



220 
230 



T 
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I 

240 IF j THEN 380 ELSE 480 

250 ' 1 

260 ' 

270 CLS:PEN 6 

280 PRINT:PRINT" CHOOSE CONTROL" , 

290 PRINT:PRINT:PRINT:PRINT"press J/K then ENTER" 

300 LOCATE 4,10:PRINT"JOYSTICK";TAB(5);"OR KEYS" 

310 LOCATE 1 2, 1 : I F j THEN PR I NT"*" : ELS E PRINT" " 

320 LOCATE 12,11:IF j THEN PRINT" ":ELSE PRINT"*" 

330 IF N0TUNKEYC45)) THEN j=-1 ^ 

340 IF NOT(INKEY(37)) THEN j=0 

350 IF N0T(INKEYC18)) THEN RETURN ELSE 310 1 

360 • 

370 ' ' 

380 p1=JOY<0) :p2 = JOY(1) , 

390 p1dir=(p1 AND 1)*-1+Cp1 AND 2)*0.5 

400 p2dir=Cp2 AND 1)*-1+Cp2 AND 2)*0.5 I 

410 IF P1 AND 16 THEN pi sa =p1 sa-1 : I F p1sa=-1 THEN AFTER 

15 GOSUB 770 < 

420 IF P2 AND 16 THEN p2sa=p2sa-1 : 1 F p2sa = -1 THEN AFTER , 

15 GOSUB 770 
430 IF plsa THEN p1dir=0 i 

440 IF p2sa THEN p2di r=0 

450 RETURN 1 

460 ' 
470 ' 

480 p2dir=((INKEY(4)=0)*1)+((INKEY(5)=0)*-1) i 

490 pi di r=C(INKEYC69)=0)*1)+((INKEY(71)=0)*-1) 
500 IF INKEY(63>=0 THEN p1 sa = p1 sa-1 : 1 F p1sa = -1 THEN AFT 

ER 15 GOSUB 770 
510 IF INKEY(10)=0 THEN p2 sa=p2sa-1 : I F p2sa=-1 THEN AFT 

ER 15 GOSUB 770 i 

520 IF plsa THEN p1dir=0 

530 IF p2sa THEN p2dir=0 ( 

540 RETURN 
550 ' 

560 ■ i 

570 pt=p1wp+p1di r:IF pt>25 OR pt<6 THEN RETURN ELSE plw 

p = pt 
580 pldi r=0 

590 PEN 1:LOCATE 3,p1wp:CLS #3:PRINT CHR$(209) ;: RETURN 
600 * 
610 ' 
620 pt=p2wp+p2di r:IF pt>25 OR pt<6 THEN RETURN ELSE p2w 

P = pt 

continued on the next page 



Appendix 3 Some Programs for you.. 



630 p2dir=0 

640 PEN 2:L0CATE 18,p2wp:CLS #5:PRINT CHR$(21 1 );: RETURN 

650 ' 

660 * 

670 PAPER #4,4:WIND0W #4,4, 1 7,p1wp,p1wp: CLS#4 : FRAME : FRA 

HE 
680 PAPER #4,0:CLS#4 
690 GOTO 570 
700 ' 
710 ' 
720 PAPER #6,5:WINDOW #6,4,1 7,p2wp,p2wp: CLS#6 :. FRAME : FRA 

ME 
730 PAPER #6,0:CLS#6 
740 GOTO 620 
750 ' 
760 ' 
770 pwpe=(p1wp=p2wp) :IF plsa AND NOT(p2sa> AND pwpe THE 

N p1sc = p1sc + 1 :SOUND 132, 1 20, 10,0, 1 ,0: PRINTfll ,a$(p1 s 

c);:IF p1sc=9 THEN 860 
780 IF p2sa AND NOT(plsa) AND pwpe THEN p2sc=p2sc+1 : SOU 

ND 132,100,10,0,1,0:PRINT#2,a$(p2sc>;:IF p2sc=9 THE 

N 860 
790 IF plsa THEN SOUND 132,40,70,0,1,1 
800 IF p2sa THEN SOUND 132,56,70,0,1,1 
810 p1sa=0 
820 p2sa=0 
830 RETURN 
840 ■ 
850 • 
860 PEN 6 

870 LOCATE 6, 10: PRINT"GAME OVER" 
880 IF p1sc=9 THEN INK 1,2,20:INK 2,0 ELSE INK 2,6,17:1 

NK 1,0 
890 SOUND 129, 1000,0, 12, 3:SOUND 130,900,0,12,3 
900 WHILE INKEY$<>"":WEND 
910 t !=TIME:WHILE t ! +2000>TIME : WEND 
920 WHILE INKEY$="":WEND 
930 CLS 

940 finished=-1 
950 RETURN 
960 ' 
970 ' 
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I 
I 

I 

i 

1 

980 a$C0)="111101101101111" 

990 a$(1)="001001001001001" | 

aSC2>="1 1 1001 1 1 1 1001 1 1" 

a$(3)="111001111001111" ■ 

a$<4)="100100101111001" 

a$(5)="11110011100111 1" 

a$<6)="111100111101111" < 

a$(7)="111001001010010" 

a$<8)=*'11110111110111 1" ' 

aS(9)="111101111001001" 

FOR n=0 TO 9 

howLong=LENCa$Cn) ) 

FOR n2=1 TO howLong 

IF MID$(a$(n),n2,1)="1"THEN MI DS CaS C n) ,n2, 1 ) = CHR$ ( 

143) ELSE MID$(a$<n),n2,1)=CHR$(32) 

NEXT n2,n 



b$="ELECTRIC FENCING" 

c$=CHR$(32)+CHR$(164>+" Alexander Martin" 
ENV 1,=9,2000:ENT -1,6,3,1 

ENV 2,127,0,0,127,0,0,127,0,0,127,0,0,127,0,0 
ENV 3, = 9, 9000 



BORDER 

INK 0,12:PEN #4,1:PEN #6,2:PEN #1,1:PEN #2,2:PAPER 

#1,3:PAPER #2,3:PEN #0,6 
RETURN 'FROM SETTING UP CONSTANTS 



INK 0,12:INK 1,2:INK 2,6:INK 3,13:INK 4,20:INK 5,1 

7:INK 6,20 

WINDOW #3,3,3,6,25:W1ND0W #5,18,18,6,25 

WINDOW #1,3,5,1,5:UINDOU #2, 1 6, 1 8, 1 ,5 : WINDOW #7,1, 

20,1,5:PAPER #7,3 
1300 CLS:CLS#7:PRINT#1,a$(0);:PRINT#2,a$C0);:p1sc=0:p2s 4 

c = 0:p1wp=5:p2wp = 24:p1di r = 1 : p2di r = 1 
1310 GOSUB 570:GOSUB 620 4 

1320 SOUND 1,1000,0, 12, 2:S0UND 2,900,0,12,2 

1330 p1sa=0:p2sa=0:f inished=0 ' 

1340 RETURN 'FROM GAME SHEET RESTORE , 

1350 ' 

1360 ' 1 

1370 CLS 

continued on the next page ' 
i 

Appendix 3 Some Programs for you.... i 



1010 


1020 


1030 


1040 


1050 


1060 


1070 


1080 


1090 


1100 


1110 


1120 


1130 


1140 


1150 


1160 


1170 


1180 


1190 


1200 


1210 


1220 


1230 


1240 


1250 


1260 


1270 


1280 


1290 



1380 PEN 7 

1390 FOR n=1 TO LEN(b$) 

1400 LOCATE 2+n,10 

1410 FOR n2=LENCb$) TO n STEP-1 

1420 PRINT MID$CbS x n2,1 ) 

1430 LOCATE 2 + 11,10 

1440 SOUND 135, 20*n2,5, 12,2,1 

1450 NEXT n2,n 

1460 SOUND 135,100,0,13,3,1,20 

1470 PEN 6:PRINT:PRINT:PRINT:PRINT c$ 

1480 FOR n=1 TO 5000:NEXT 

1490 RETURN 

1500 ' 

1510 ' 

1520 IF j THEN RETURN 

1530 CLS 

1540 LOCATE 7,5 

1550 PRINT"C0NTROLS" 

1560 PRINT 

1570 PRINT" PLAYER1 PLAYER2" 

1580 PRINT 

1590 PRINT" A up 6" 

1600 PRINT" Z down 3" 

1610 PRINT" X fire 7" 

1620 t !-TIME:WHILE t ! +1000>TIME : WEND 

1630 RETURN 

Pontoon 

Brings out the gambler in you! For one player against the computer. Keyboard only. 



10 'PONTOON 

20 'copyright (c) AMSOFT 1984 

30 • 

40 INK 0,21:INK 1,0:INK 3,6 

50 ENV 1,7,2,1 

60 MODE 1 

70 yc=2: cc=2 

80 aces =0 

90 caces=0 

100 Laces=0 
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i 
i 
l 
i 

i 

110 s=0 ' 

120 t=0 i 

130 DIM sui t$(4) 

140 suit$<1)=CHR$<226> < 

150 suit$(2)=CHR$<229> 

160 suit$(3)=CHR$(228> 

170 suU$(4)=CHR$<227> j 

180 CLS 

190 DIM pack(52) 1 

200 FOR x= 1 TO 52 

210 pack(x)=0 

220 NEXT x 1 

230 ' 

240 'Deal two cards to each player < 

250 ' 

260 LOCATE 8,3 

270 PRINT "PLAYER";SPCC15)"H0USE" I 

280 LOCATE 7,5 

290 GOSUB 930 < 

300 s=s+f 

310 IF f=11 THEN aces=aces+1 

320 LOCATE 27,5 I 

330 GOSUB 930 

340 t=t+f * 

350 IF f=11 THEN caces=caces+1 

360 LOCATE 7,6 ' 

370 GOSUB 930 t 

380 s=s+f 

390 IF s=21 THEN 850 i 

400 IF f=11 THEN aces=aces+1 

410 IF s=22 THEN aces=aces-1 

420 IF s=22 THEN s=12 I 

430 ' 

440 'Input opt ion-twi st C t) or stick(s) I 

450 ■ 

460 LOCATE 10,12: PRINT "TWIST (t) OR STICK (s)":FOR z= 

1 TO 500:NEXT: LOCATE T0,12:PRINT SPCC25):FOR z = 1 TO < 
500:NEXT 
470 x$=LOWER$(INKEY$) :IF x$<>"s" AND x$<>"t" THEN 460 4 

480 IF x$ = "s" THEN LOCATE 1 0, 12 : PRINT : GOTO 680 

490 LOCATE 7,yc+5 * 

500 yc=yc+1 < 

510 GOSUB 930 
520 s=s+f 1 
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530 IF f = 11 THEN aces=aces+1 

540 ■ 

550 'Check score and aces 

560 ' 

570 IF s<22 THEN 460 

580 IF aces=0 THEN 620 

590 aces=aces-1 

600 s=s-10 

610 GOTO 570 

620 LOCATE 12,19 

630 PRINT "YOU'RE BUST" 

640 PRINT:LOCATE 1 2,21 : PRINT"ANOTHER GAME (Y/N)" 

650 x$=LOWER$(INKEY$):IF x$<>"y" AND x$<>"n" THEN 650 

660 IF x$="y" THEN RUN 

670 END 

680 LOCATE 27,6 

690 GOSUB 930 

700 t=t+f 

710 IF f =11 THEN caces=caces+1 

720 IF t=17 OR t=18 OR t=19 OR t=20 OR t=21 THEN GOTO 8 

80 
730 cc=cc+1 
740 LOCATE 27,cc+4 
750 GOSUB 930 
760 t=t+f 

770 IF f =1 1 THEN caces=caces+1 

780 IF t>6 AND t<12 AND Laces>0 THEN t=t+10:GOTO 880 
790 IF t<21 THEN 720 
800 IF t = 21 THEN 880 
810 IF caces=0 THEN 850 
820 caces=caces-1:laces=laces+1 
830 t=t-10 
840 GOTO 790 
850 LOCATE 12,19 
860 PRINT "YOU WIN" 
870 GOTO 640 
880 LOCATE 12,19 
890 IF t<s THEN 850 
900 PRINT "THE HOUSE WINS" 
910 GOTO 640 
920 ' 

930 ' Dea I card 
940 ' 
950 card=INT(RNDC1)*52+1) 

continued on the next page 
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960 IF pack(card)=1 THEN GOTO 950 ' 

970 pack(card>=1 < 

980 f=card-13*INT(card/13) 

990 IF f=0 THEN f =13 

1000 IF f=1 OR f > 10 THEN 60TO 1090 

1010 FOR z=1 TO 1000:z=z+1 :NEXT 

1020 IF f =10 THEN PRINT f;" "; 

1030 IF f <1 THEN PRINT " "f" "; 

1040 IF f>10 THEN f =10 i 

1050 IF card>26 THEN PEN 3 ELSE PEN 1 

1060 SOUND 1,0,0,0,1,,1:PRINT sui t$C INT C C card-1 ) /I 3) + 1 ) ' 

1070 PEN 1 . 

1080 RETURN 

1090 FOR z=1 TO 1000:z=z+1 :NEXT I 

1100 IF f=11 THEN PRINT " J "; 

1110 IF f =12 THEN PRINT " Q "; ' 

1120 IF f =13 THEN PRINT " K "; ■ 

1130 IF f<>1 THEN GOTO 1040 

1140 f = 1 1 , 

1150 PRINT " A "; 

1160 GOTO 1060 I 



A variation on a classic theme! For one player against the computer. Keyboard or i 

Joystick. 

I 

10 'BOMBER by DAVE TOWN 

20 'copyright (c) AHSOFT 1984 I 

30 ' 

40 MODE 1:CLS:INK 0,0:BORDER 0:INK 1,18:INK 2,6:INK 3,4 ' 

:INK 5,15 : INK 6,2:INK 7,24:INK 8,8:INK 9,26:INK 10,1 i 

0:INK 1 1 ,20: INK 12,12:INK 13,16:INK 14,H:INK 15,21 

50 SYMBOL AFTER 240:SYMBOL 241 ,640,S60,870,S7F,S7F,&3F, < 

87,80: SYMBOL 242,80, 832,87a, SFE,8FA,8F2,8E0, 80 

60 score = 0:hi score=0 : plane$=CHR$ ( 241 ) +CHR$(242) :x=2:y=2 4 

:drop = 0:a = 2 :b = 2 j 
70 GOSUB 480 

80 CLS i 
90 PEN 2:LOCATE 1 , 1 5 : INPUT"En t er skill : (ACE) to 5 C 

NOVICE) : ", skill < 

continued on the next page ^ 
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100 IF ski L L<0 OR ski L L>5 GOTO 90 

110 ski U = ski LL + 10 

120 LOCATE 1,15: PRINT CHR$ C 1 8) ;: LOCATE 1 ,1 5 : INPUT"Enter 

speed (FAST) to 100 (SLOW) : ",rate 
130 IF rate>100 OR rate<0 GOTO 120 
140 ' 

150 ' Bui Ldi ngs 
160 * 
170 MODE 0:FOR base=5 TO 15 : FOR height=21 TO INT(RNDd) 

*8+skill) STEP -1:LOCATE base, hei ght : PEN base-2:PRI 

NT CHR$(143)+CHR$<8)+CHR$(11)+CHR$(244);:NEXT :NEXT 
180 PLOT 0,20,4:DRAU 640,20,4 
190 LOCATE 1 ,25: PEN 2 : PRINT"SCORE"; score; : LOCATE 13,25: 

PRINT"HI";hiscore; 
200 ' 

210 'Main Game 
220 * 

230 LOCATE x-1,y:PRINT" "; 
240 PEN 1:L0CATE x,y:PRINT pLane$;:PEN 2 
250 IF y=21 AND x=15 THEN GOTO 290:ELSE GOTO 340 
260 ' 

270 'Landed 
280 ' 

290 FOR c=0 TO 1000:NEXT 
300 score = score + 100-(skill*2):skiH. = skill-1:x = 2:y = 2:a = 2 

: b = 2 : drop = 
310 IF skiU<10 THEN ski U = 10 : rate=rate-20 
320 IF rate<0 THEN rate=0 
330 GOTO 150 

340 FOR c=0 TO rate:NEXT 
350 x=x+1 
360 IF x-18 THEN LOCATE x-1,y:PRINT CHR$ ( 18) ; : x=2 :y=y+1 

:LOCATE x,y:PEN 1:PRINT pLane$;:PEN 2 
370 a$=INKEY$:lF a$=" " AND drop=0 THEN drop=1 : b=y+2 : a= 

x 
380 IF y=21 THEN drop=0 
390 IF drop=1 THEN LOCATE a,b:PRINT CHRSC252) ;: LOCATE a 

,b-1:PRINT" ";:b=b+1:IF b>21 THEN LOCATE a,b:PRINT M 
";:LOCATE a,b-1:PRINT" ";: a=0 : b=0 :drop=0: SOUND 3,4 

000,10,12,0,0,10 
400 ga=Ca-0.5)*32:gb=400-(b*16):bomb=TEST(ga,gb> 
410 IF bomb>0 THEN GOTO 670 

420 gx=(Cx + 1.5)*32) : gy = 408- Cy*16) :crash = TESTCgx,gy> 
430 IF crash>0 GOTO 570 
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690 NEXT 

700 LOCATE 6,25:PRINT score; : drop = : a = x : b = y : GOTO 230 



440 GOTO 230 
450 ' 

460 ' Instructions 
470 ' 

480 LOCATE 1,2:PEN 1:PRINT"You are piloting an aircraft 
over a des-erted city and must clear the buildings 
in order to (.and and refuel. Your air- craft move 

s across the screen from left to ri ght .";: PRINT * 

490 PRINT:PRINT"On reaching the right, the aircraft , 

returns to the left A LINE FURTHER DOWN. You have a 

n unlimited supply of bombs and you can drop them i 
on the buildings below by pressing the SPACE BAR. 

";:PRINT 1 

500 PRINT:PRINT"Each time you land, the height of the 

buildings or the speed of your aircraft increases. ' 

"; :PRINT:PRINT:PRINT"ONCE YOU HAVE RELEASED A BOMB, , 

YOU WILL NOT BE ABLE TO RELEASE ANOTHER UNTIL THE 

FIRST HAS EXPLODED !!!!"; i 

510 PEN 2:L0CATE 1 ,24 : PRINT : PRINT"Press any key to star 

t."; i 

520 a$=INKEY$:IF a$="" GOTO 520 

530 RETURN ' 

540 ' 

550 'Collision 

560 * , 

570 LOCATE x-1,y:PRINT CHR$(32)+CHR$(32) +CHR$(32)+CHR$( 

253)+CHR$(8)+CHR$(238)+CHR$<8); I 

580 FOR t=1 TO 10:SOUND 7,4000,5, 1 5,0,0,5 : PEN t:PRINT C 

HR$(253)+CHR$(8)+CHR$(238>+CHR$(8)+CHR$(32)+CHR$(8) * 

;:F0R tm = TO 50 : NEXT : NEXT : PEN 2 , 

590 CLS:LOCATE 1 ,5 : PRINT"You scored"; score; 
600 IF score>hi score THEN hi score=score : LOCATE 1,8:PRIN ( 

T"T0P SCORE! !"; 
610 score=0:LOCATE 1 , 1 2 : PRINT"Press R to restart"; I 

620 a$=INKEY$:IF a$="r" OR a$="R" GOTO 630 ELSE GOTO 62 



630 PEN 1:H0DE 1 : x = 2 : y = 2 : a = 2 : b = 2 : GOTO 90 k 

640 ' 1 

650 'Bombed building < 
660 ' 

670 LOCATE a,b-1:PRINT" "+ CHR$ (8) ; : PEN 4:FOR tr=1 TO IN < 
T(RNDU)*3) + 1:score = score + 5:S0UND 3,4000,10,12,0,0, 

10:LOCATE a,b:F0R t=0 TO 4:PRINT CHR$(253) +CHR$(8)+ * 

CHR$C32)+CHR$C8); :NEXT:b=b+1 , 
680 IF b=24 THEN b=b-1 



1 

i 

< 
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Amthello 



The thinking person'8 game. Try to surround and capture your opponent's squares 
without leaving your own squares open to capture! For one player against the 

Mvmnnter KAvhnnrrl nnlv 



yv-luujui, leaving JUUI UY 

computer. Keyboard only 



10 'AMTHELLO by M.J.GRIBBINS 

20 'copyright Cc) AHSOFT 1984 

30 ' 

40 BORDER 14 

50 CLEAR 

60 MODE 1:PEN 0:PAPER 1:CLS 

70 INK 0,0:INK 1,14: INK 2,18:INK 3,26 

80 LOCATE 2,3:PEN 3 : PRINT"A" : LOCATE 3,4 : PRINT"M" : LOCATE 

4,5 :PRINT"T": LOCATE 5,6:PRINT"H" 
90 LOCATE 6,7:PRINT"E":L0CATE 7,8: PRINT"L" : LOCATE 8,9:P 

RINT"L":LOCATE 9, 10 : PRINT"0" 
100 WINDOW #1,2,39,22,25:PAPER #1,1:PEN #1,0:CLS #1 
110 PEN 

120 LOCATE #1,8,1:PRINT #1, "BLACK ALWAYS PLAYS FIRST" 
130 LOCATE #1,1,3:PRINT #1, "PRESS B OR W TO CHOOSE BLAC 

K OR WHITE" 
140 B$=INKEY$:IF B$= M " THEN 140 

150 IF B$="W M OR B$="w" THEN d%=3 :N%=0 : GOTO 210 
160 IF B$="B" OR B$="b" THEN <U = 0:NX = 3 : GOTO 210 
170 CLS #1:L0CATE #1,4,3 

180 PRINT #1," BLACK OR WHITE ONLY" 
190 FOR T=0 TO 1000:NEXT T 
200 GOTO 140 

210 DIM C%(10,10),P%(9,9),CUC8),C2X(8),CXX(9),CY%C9) 
220 IU = 2:J1X = 2:I2% = 7:J2% = 7 
230 FOR I% = TO 9 
240 CX(IX,OX)=6:C%(0,IX)=6 
250 CX(9,IX)=6:CX(I%,9)=6 
260 NEXT IX 
270 FOR IX=1 TO 8 
280 READ C1X(IX),C2X(U) 
290 FOR JX = 1 TO 8 
300 READ PX(IX,JX) 
310 CX(IX,JX)=6 
320 NEXT JX:NEXT IX 
330 C%(4,4)=3:CX(4,5)=0:CXC5,4)=0:CX(5,5)=3 

continued on the next page 
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i 
i 
i 
t 

. < 

340 FOR KZ=1 TO 58 

350 READ AR%,BR%,CR% jr DR% 1 

360 PLOT ARX / BRX:DRAV CRX / DR3! / 

370 NEXT KZ ( 

380 GOSUB 1460 , 

390 IF Q% = 3 GOTO 770 

400 CLS #1:INPUT #1 ," WHICH LINE DO YOU WANT ";E% ^ 

410 IF VA <1 OR t% >8 GOTO 400 

420 LOCATE #1,1,3: INPUT #1, "WHICH COLUMN DO YOU WANT "; ' 

D% 
430 IF \>X <1 OR t>% >8 GOTO 420 
440 IF C% C DX X EX) =6 GOTO 480 
450 CLS #1: LOCATE #1,5,2:PRINT HM/'THAT SQUARE IS ALREA 

DY OCCUPIED !" 
460 FOR T=1 TO 1000:NEXT T 
470 GOTO 400 
480 PLOT 270+(30*D%),70+(30*E/S):DRAW 290+(30*D%) ,89+(30 

490 PLOT 290+(30*DX),70+(30*E%):DRAW 270+ (30*D%) ,89+<30 

500 GOTO 540 

510 FOR H%= TO 19 STEP 2:PLOT 270+ (30*0%) / 70+HZ+ C30*E 

X) 
520 DRAW 290+(30*DJS),70 + M% + (30*E%),6:NEXT NX 
530 GOTO 400 
540 VRX/S = 
550 FOR KX=1 TO 8 
560 VR%=0:C3%=D%:C4%=EZ 
570 C3%=C3X + C1X(l«>:C4X = C4% + C2%(ia) 
580 IF C%(C3/i,C4%)=N% GOTO 590 ELSE 600 
590 VRX = VRK+1 :GOT0 570 

600 IF a(C3X,C4X)=6 GOTO 610 ELSE 620 
610 NEXT KX:GOTO 670 
620 IF VR% = GOTO 610 ELSE 630 
630 VRXX=VRXX+VRX 

640 C3Z = C3%-CU<KX) : C4X=C4%-C2%(K%) 
650 IF CX(C3X / C4%)=6 GOTO 610 ELSE 660 i 

660 C%(C3X,C4X)=QX:G0T0 640 

670 IF VRX%=0 GOTO 680 ELSE 710 < 

680 CLS #1:PRINT #1," THIS IS NOT A POSSIBLE CHOICE" 
690 FOR T=1 TO 1000:NEXT T 
700 GOTO 510 { 

710 EX=EX:D%=D%:VRXX=VRXX 
720 CLS #1:PRINT #1/'Y0U HAVE PLAYED LINE NUMBER ";EJJ * 



1 
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730 PRINT #1," AND COLUMN NUMBER H ;DX 

740 LOCATE #1,2,4:PRINT #1,"THAT GIVES YOU ";VRXX;" SQU 

ARES(S)" 

750 C%(DX,EX)=aX:GOSUB 1710 

760 GOSUB 1460 

770 CLS #1: LOCATE #1^10^2: PRINT jM/'NOW IT'S MY TURN .. 
i » 

780 PX=0:VRXX=0:VRYX=0 

790 IF I1X*J1%=1 AND I2X*J2X=64 GOTO 860 

800 FOR KX = 2 TO 7 

810 IF CX(2,KX> <> 6 THEN HX = 1 

820 IF a<7,KX> <> 6 THEN I2% = 8 

830 IF C%(KX,2> <> 6 THEN JIM 

840 IF CX(KX,7> <> 6 THEN J2X = 8 

850 NEXT K% 

860 FOR IX=I1X TO I2X 

870 FOR JX=J1X TO J2X 

880 IF CX(IX,JX)=6 GOTO 1030 

890 NEXT JX:NEXT IX 

900 IF PX > GOTO 1000 

910 IF PASX=1 GOTO 920 ELSE 940 

920 CLS #1:PRINT #1," DEADLOCK ! I MUST PASS ALSO. GAME 

OVER" 
930 FOR T=1 TO 1000:NEXT T:GOTO 1550 
940 CLS #1:L0CATE #1 , 18,2 : PRINT jM/'I MUST PASS" 
950 GOSUB 2720 

960 IF PASX=1 GOTO 970 ELSE 990 
970 CLS #1:PRINT #1 /'DEADLOCK! YOU MUST PASS ALSO. GAME 

OVER" 
980 FOR T=1 TO 1000:NEXT T:GOTO 1550 
990 GOTO 400 

1000 IF LCX = THEN LCX = 1 : RANDOMIZE LCX : RLX = RND( LCX) 
1010 CX1%=CXX(RLX):CX2X=CYX<RLX> 
1020 GOTO 1220 
1030 VRXX=0 
1040 FOR KX=1 TO 8 
1050 VRX=0:C3X=IX:C4X=JX 
1060 C3X=C3X+C1X(KX):C4X=C4X+C2X(KX) 
1070 IF CX(C3X,C4X)=QX GOTO 1080 ELSE 1090 
1080 VRX=VRX+1:GOTO 1060 

1090 IF CXCC3X / C4X)=6 GOTO 1100 ELSE 1110 
1100 NEXT KX:GOTO 1130 
1110 IF VRX=OX GOTO 1100 ELSE 1120 
1120 VRXX=VRXX+VRX:GOTO 1100 
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1130 


1140 


1150 


1160 


1170 


1180 


1190 


1200 


1210 


1220 


1230 


1240 


1250 



IF VRX%=0 GOTO 890 

IF PX(IX,JX) < ?% GOTO 890 

IF P% C 1%, J %) > P% GOTO 1160 ELSE 1170 

PX = PXCIX / JX) :VRYX=VRX%:LCX=0:CX%(0)=IX:CYX<0)=J%:G 

OTO 890 

IF VRY% > VRXX GOTO 890 

IF VRYX < VRX% GOTO 1190 ELSE 1200 

LC% = 0:VRYX = VRXX:CX%C0) = U:CYX(0) = JJi:GOTO 890 

LCX = LCX + 1:CXX(LCX) = IX:CYX<LC%)=JJ! 

GOTO 890 

CX2X = CX2X:CXU = CX1X:VRYX = VRY% 

CLS #1: PRINT #1/' I CHOOSE LINE NUMBER ";CX2X 

PRINT #1/' AND COLUMN NUMBER ";CXU 

LOCATE #1,1,4:PRINT #1,"THAT GIVES ME ";VRYX;" SQU 

ARECS)" 
1260 PLOT 270+C30*CX1Z),70 + C30*CX2%):DRAW 290+(30*CXU> 

,89+<30*CX2X),NX 
1270 PLOT 290+(30*CXU),70 + (30*CX2%):DRAW 270+(30*CXU) 

/ 89+C30*CX2Z) / N% 

FOR T=1 TO 1000:NEXT T 

FOR KX = 1 TO 8 

VR% = 0:C3X = CXU:C4% = CX2X 

C3X=C3X+C1X(KX):C4X=C4X+C2X(KX) 

IF CZ(C3X,C4X)=Q% GOTO 1330 ELSE 1340 

VRX=VRX+1:GOTO 1310 

IF C%CC3%,C4%)=6 GOTO 1350 ELSE 1360 

NEXT K%:GOTO 1400 

IF VR% = GOTO 1350 

C3%=C3Z-CU(K%):C4% = C4%-C2%(K%> 

IF C%(C3%,C4%)=6 GOTO 1350 

«<C3%,C4%)=N%:GOT0 1370 

CXCCXU,CX2/!)=N% 

GOSUB 2720 

GOSUB 1460 

IF PAS%=1 GOTO 1440 ELSE 1450 

CLS #1:PRINT #1," YOU MUST PASS":FOR T=1 TO 10 

00:NEXT T:GOTO 770 , 

GOTO 400 

FOR IZ=1 TO 8 < 

FOR JX=1 TO 8 

FOR M%=0 TO 19 STEP 2 ' 

Z% = 270+(30*I%):H% = 70+<30*J!O:W% = H% + M% , 

PLOT Z%,WX:DRAW Z% + 20 ,W%,C%U%, J%) 

NEXT H%:NEXT J%:NEXT 1% 1 

continued on the next page 
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1280 


1290 


1300 


1310 


1320 


1330 


1340 


1350 


1360 


1370 


1380 


1390 


1400 


1410 


1420 


1430 


1440 


1450 


1460 


1470 


1480 


1490 


1500 


1510 



1520 X%=X%+1 

1530 IF XX = 61 GOTO 1550 

1540 RETURN 

1550 C9X=0:CN%=0 

1560 FOR I%=1 TO 8 

1570 FOR J%=1 TO 8 

1580 IF C%(IX,JX)=QX THEN CQK=CQK+1 

1590 IF C%<I%,JK)=N% THEN CNX=CNX+1 

1600 NEXT J2:NEXT 1% 

1610 IF CQ% > CNX GOTO 1680 

1620 IF CQ%=CN% GOTO 1630 ELSE 1650 

1630 CLS #1:LOCATE #1 ,25 ,2 : PRINT #1 /'DEADLOCK"' 

1640 END 

1650 CLS #1:LOCATE #1,5,1:PRINT 01, "YOU HAVE ";CQX;" SQ 

UARES;I HAVE ";CN% 

1660 LOCATE #1 ,1 1 ,3 : PRINT #1,"! HAVE WON !!!!" 

1670 END 

1680 CLS #1:LOCATE #1,5,1 : PRINT #1,"YOU HAVE ";C<k%;" SO 

UARES;I HAVE ";CN2 

1690 LOCATE #1,5,3:PRINT JM/'WELL DONE. YOU HAVE WON !! 

ir 

1700 END 

1710 IF a(2,2)=QX AND (C%(3,1)=N% OR C%(1,3)=N%) GOTO 

1720 ELSE 1730 
1720 P%(3,1)=1:P%<1,3>=1 
1730 IF C/!(7 / 7)=Q% AND ( CX (8,6) =N% OR CX(6,8)=NJ£) GOTO 

1740 ELSE 1750 
1740 P%(8,6) = 1:PU6,8) = 1 
1750 IF CX(2,7>=QZ AND (CX(1,6)=KX OR CXC3 / 8)=NX) GOTO 

1760 ELSE 1770 
1760 P%(1,6)=1:P%(3,8>=1 
1770 IF C%(7,2)=0.% AND (C%C6,1>=NX OR CX(8,3)=N%) GOTO 

1780 ELSE 1790 
1780 P%(6,1)=1:P%(8,3)=1 

1790 IF D%=1 OR D%=8 OR E%=1 OR EX=8 GOTO 1820 
1800 IF CXU = 1 OR CX1%=8 OR CX2%=1 OR CX2X=8 GOTO 1820 
1810 RETURN 

1820 FOR J % = 1 TO 8 STEP 7 
1,830 FOR IX = 2 TO 7 

1840 IF CX(IX,JX)=N3! GOTO 1850 ELSE 1860 
1850 PX(U + 1,J%)=21:P%<U-1,J!0=21 
1860 IF CX14%,IX)=UX GOTO 1870 ELSE 1880 
1870 PXCJX / I%+1)=21:P%(JX,IX-1)=21 
1880 NEXT IX 
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1890 FOR IX = 2 TO 7 

1900 IF CX(IX,JX)=QX GOTO 1910 ELSE 1920 { 

1910 PX(IX + l / JSi)=2:P)£(lX-1,JS!)=2 

1920 IF CXUX,IX)=QX GOTO 1930 ELSE 1940 i 

1930 PX(JX / IX+1)=2:PX(JX / IX-1>=2 

1940 NEXT IX:NEXT J % ' 

1950 PZC1 / 2)=1:PX(1 / 7J=1:PXC2 / 1)=1:PXC7,1)=1 

1960 P%(2,8)=1:P%<7,8)=1:P%(8,2)=1:PX(8,7)=1 

1970 FOR IX = 2 TO 7 i 

1980 IF CX(l,IX-1)=aX AND CX C 1 , IX + 1 ) = QX THEN PX(1,IX)=2 

5 < 

1990 IF CX(8,IX-1)=QX AND a<8,IX + 1)=QX THEN P% CS^'I !K > = 2 , 

2000 IF CXUX-1,1)=GlX AND CX ( IX + 1 , 1 ) =GtX THEN PX(IX,1>=2 < 

5 
2010 IF CX(IX-1,8)=QX AND CX ( IX + 1 ,8>=QX THEN PX(1X,8)=2 < 

5 I 

2020 NEXT 1% 

2030 FOR JX = 1 TO '8 STEP 7 < 

2040 FOR IX = 4 TO 8 

2050 IF CX(JX,IX) <> NX GOTO 2140 < 

2060 ICX=IX-1:IF CX C JX,I CX ) =6 GOTO 2140 

2070 IF CX(JX,ICX)=QX GOTO 2080 ELSE 2090 

2080 ICX=ICX-1 :GOTO 2070 « 

2090 IF CX(JX,ICX>=6 GOTO 2110 

2100 GOTO 2140 < 

2110 IF ICX = GOTO 2140 

2120 IF CX(JX,1X+1)=QX AND CX ( J X,I CX-1) =6 GOTO 2140 

2130 PX(JX,ICX)=26 < 

2140 IF CX(IX,JX) <> NX GOTO 2230 

2150 ICX=IX-1:IF CX(ICX,JX)=6 GOTO 2230 < 

2160 IF CX(ICX,JX)=QX GOTO 2170 ELSE 2180 t 

2170 ia = ia-1 :GOTO 2160 ' 

2180 IF CX(ICX,JX)=6 GOTO 2200 I 

2190 GOTO 2230 

2200 IF ICX=0 GOTO 2230 ' 

2210 IF CX(IX+1,JX)=QX AND CX C I CX-1 , J X) =6 GOTO 2230 

2220 PX(ia / JX)=26 

2230 NEXT IX 4 

2240 FOR IX=1 TO 5 

2250 IF CX(JX,IX) <> NX GOTO 2340 1 

2260 ICX = I%+1:IF CXUX,ICX)=6 GOTO 2340 

2270 IF CX(JX,ICX)=9X GOTO 2280 ELSE 2290 

2280 ICX = ICX + 1 :GOTO 2270 \ 



i 
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2290 IF CX(JX,ICX)=6 GOTO 2310 

2300 GOTO 2340 

2310 IF IC3£ = 9 GOTO 2340 

2320 IF CX(JX,IX-1)=&% AND CX ( J X,l C% + 1 ) =6 GOTO 2340 

2330 PX(JX,IC%)=26 

2340 IF CX(IX,JX) <> NX GOTO 2430 

2350 ICX=IX+1:IF CX( ICX, J%) =6 GOTO 2430 

2360 IF C%C IC%,J%)=a% GOTO 2370 ELSE 2380 

2370 ICX=ICX+1:GOTO 2360 

2380 IF CX(ICX,JX)=6 GOTO 2400 

2390 GOTO 2430 

2400 IF ICX = 9 GOTO 2430 

2410 IF CX(IX-1,JX)=Q% AND CX ( ICX + 1 , J%) =6 GOTO 2430 

2420 P%(ICX,JX>=26 

2430 NEXT IX:NEXT JX 

2440 IF CX(1,1)=NX GOTO 2450 ELSE 2460 

2450 FOR IX = 2 TO 6: PX( 1 , U)=20 : ?% ( IX, 1 ) =20 : NEXT 1% 

2460 IF CX(1,8)=NX GOTO 2470 ELSE 2480 

2470 FOR IX = 2 TO 6: PX< IX,8>=20 : PX ( 1 ,9-lX)=20 : NEXT IX 

2480 IF CXC8,1)=NX GOTO 2490 ELSE 2500 

2490 FOR IX=2 TO 6: PX(9-IX,1) =20: PX<8, I%>=20: NEXT IX 

2500 IF CXC8,8)=NX GOTO 2510 ELSE 2520 

2510 FOR IX=3 TO 7: PX ( IX,8)=20 : PX (8,IX) =20:NEXT IX 

2520 IF CX(1,1) <> 6 THEN PX(2,2)=5 

2530 IF C%(1,8) <> 6 THEN PX(2,7)=5 

2540 IF CX<8,1) <> 6 THEN PX<7,2)=5 

2550 IF CXC8,8) <> 6 THEN PX(7,7)=5 

2560 PX<1,1)=30:PX(1 / 8)=30:PX(8,1>=30:PX<8,8>=30 

2570 FOR IX=3 TO 6 

2580 IF CX(1,IX)=NX THEN PXC2,IX)=4 

2590 IF CX(8,I%)=NX THEN PXC7,IX>=4 

2600 IF CX(IX,1)=NX THEN PXUX,2)=4 

2610 IF CXCIX,8)=NX THEN PX(IX,7)=4 

2620 NEXT IX 

2630 IF CXC7,1)=QX AND CX(4,1)=NX AND CX<6,1)=6 AND CX( 

5,11=6 THEN PX<6,1)=26 
2640 IF CX(1,7)=9X AND CXC1,4)=NX AND CX(1,6)=6 AND CX( 

1,5)=6 THEN PX(1,6)=26 
2650 IF CXC2,1)=8X AND CX<5,1)=NX AND CX(3,1)=6 AND C%( 

4,1)=6 THEN PXC3,1)=26 
2660 IF CXC1,2)=QX AND CX(1,5)=NX AND CX(1,3)=6 AND CXC 

1,4)=6 THEN PX(1,3)=26 
2670 IF CX(8,2)=QX AND CX(8,5)=NX AND C%<8,3)=6 AND CX( 

8,4)=6 THEN PX(8,3)=26 
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2680 IF CX(2,8)=QX AND CX(5,8)=N% AND C%<3,8)=6 AND C%( 

4,8)=6 THEN P%(3,8)=26 , 

2690 IF C%(8 / 7)=Q% AND CX(B,4)=NX AND CX<8,5>=6 AND C%( 

8,6)=6 THEN P2<8,6>=26 I 

2700 IF C%(7,8>=Q% AND CX(4,8)=N3! AND C%(5,8>=6 AND CX( 

6,8)=6 THEN PU6,8>=26 
2710 RETURN < 

2720 PAS%=0 

2730 FOR IS!=1 TO 8 < 

2740 FOR J2=1 TO 8 

2750 IF CX(IX,JX)=QX GOTO 2780 ' 

2760 NEXT J%:NEXT 1% I 

2770 PAS%=1 :RETURN 

2780 FOR KX=1 TO 8 i 

2790 VR5i = 0:C3% = I%:C4% = J% 

2800 C3X = C3X + CU(KJ!) : C4%=C4X+C2%(K%> ' 

2810 IF C3X < 1 OR C3% > 8 GOTO 2820 ELSE 2830 j 

2820 NEXT ia:GOT0 2760 

2830 IF C4% < 1 OR C4% > 8 GOTO 2820 ELSE 2840 { 

2840 IF C%CC3%,CA%)=N% GOTO 2850 ELSE 2860 
2850 VR% = VRU1:GOTO 2800 
2860 IF C%(C3%,C4%)=Q% GOTO 2820 ELSE 2870 { 

2870 IF VR% > THEN RETURN 

2880 GOTO 2820 i 

2890 DATA 1,0,30,1,20,10,10,20,1,30,1,1,1,1,3 

2900 DATA 3,3,3,1,1,0,1,20,3,5,5,5,5,3,20,-1,1,10,3,5 ' 

2910 DATA 0,0,5,3,10,-1,0,10,3,5,0,0,5,3,10,-1 4 

2920 DATA -1,20,3,5,5,5,5,3,20,0,-1,1,1,3,3,3,3,1,1,1,- 

1,30,1,20,10,10,20,1,30 i 

2930 DATA 263,100,263,120,270,130,255,130,255,130,255,1 

40,255,140,270,140 ' 

2940 DATA 270,140,270,150,270,150,255,150,255,160,270,1 i 

60,270,160,270,180 
2950 DATA 270,180,255,180,270,170,255,170,270,190,270,2 1 

10,270,200,255,200 
2960 DATA 255,200,255,210,255,220,270,220,270,220,270,2 ' 

30,270,230,255,230 * 

2970 DATA 255,230,255,240,255,240,270,240,255,250,270,2 

50,270,250,270,260 4 

2980 DATA 270,260,255,260,255,250,255,270,270,280,270,3 

00,270,300,255,300 ' 

2990 DATA 255,310,255,330,255,330,270,330,270,330,270,3 j 

10,270,310,255,310 
3000 DATA 255,320,270,320 1 
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3010 DATA 310,355,310,375,350,355,335,355,335,355,335,3 

65,335,365,350,365 
3020 DATA 350,365,350,375,350,375,335,375,365,355,380,3 

55,380,355,380,375 
3030 DATA 380,375,365,375,380,365,365,365,410,355,410,3 

75,410,365,395,365 
3040 DATA 395,365,395,375,425,355,440,355,440,355,440,3 

65,440,365,425,365 
3050 DATA 425,365,425,375,425,375,440,375,455,375,455,3 

55,455,355,470,355 
3060 DATA 470,355,470,365,470,365,455,365,485,375,500,3 

75,500,375,500,355 
3070 DATA 515,375,515,355,515,355,530,355,530,355,530,3 

75,530,375,515,375 
3080 DATA 515,365,530,365 



Raffles 

Break into His Lordship's house and steal the booty. Lots of obstacles to trip you up, 
and you must beware of the dog! For one player against the computer. Keyboard or 
Joystick. 



10 'RAFFLES by DAVID RADISIC 

20 'copyright Cc) AMSOFT 1985 

30 ' 

40 MODE 0:INK 0,0:BORDER 0:INK 1,26:INK 2,15:INK 3,25 

50 INK 4,14:INK 5,24,12:INK 6,0:INK 7,0:INK 8,0:PAPER # 

1,7 
60 delay=200 

70 DIM objx(5,20),objy(5,20),gemx(5,20),gemy(5,20) 
80 GOSUB 380 
90 GOSUB 720 
100 pause=200:GOSUB 340 
110 IF gems=0 THEN GOSUB 970 
120 PEN 4 

130 FOR i=10 TO 12 
140 LOCATE 15, i : PRINT"SWAG"; 
150 NEXT 

160 PAPER 0:CLS#2:PAPER 8 
.170 GOSUB 1170 
180 GOSUB 1230 

continued on the next page 
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190 GOSUB 1370 ' 

200 60SUB 1510 , 

210 IF rm=0 THEN GOSUB 1900 

220 IF dead=0 THEN 160 ' i 

230 pause=100:GOSUB 340 

240 PAPER 0:CLS:PEN 1 ' 

250 LOCATE 4,3 : PRINT"Do you want"; , 

260 LOCATE 4,5 : PRINT"Anot her game"; 

270 PEN 5:LOCATE 9,7 : PRINT "Y/N"; > 

280 i$ = UPPER$(INKEY$) :IF i$o"Y" AND i$o"N" THEN 280 

290 IF i$="N" THEN MODE 2:PEN 1:STOP * 

300 RUN , 

310 IF dog=1 THEN RETURN 

320 dog = 1 : dogx = mi nx C rm) :dogy = mi ny C rm) 1 

330 RETURN 

340 FOR Loop=1 TO pause ' 

350 FRAME , 

360 NEXT 

370 RETURN { 

380 rm=1 : xp=6 :yp=4 : man$=CHR$ C 224) : dog=0: sto Len=0 

390 SYMBOL 240,8,8,8,8,8,8,8,8 < 

400 SYMBOL 241,0,0,0,0,255,0,0,0 

410 SYMBOL 242,0,0,0,0,15,8,8,8 

420 SYMBOL 243,0,0,0,0,248,8,8,8 < 

430 SYMBOL 244,8,8,8,8,248,0,0,0 

440 SYMBOL 245,8,8,8,8,15,0,0,0 < 

450 SYMBOL 246,8,12,13,14,12,12,8,8 

460 SYMBOL 247,8,12,12,14,13,12,8,8 

470 SYMBOL 248,8,24,88,56,24,24,8,8 I 

480 SYMBOL 249,8,24,24,56,88,24,8,8 

490 SYMBOL 250,0,0,255,129,129,129,255,0 < 

500 SYMBOL 251,28,20,20,20,20,20,20,28 

510 SYMBOL 252,0,0,255,255,255,255,255,0 ' 

520 SYMBOL 253,28,28,28,28,28,28,28,28 { 

530 SYMBOL 255,195,165,60,126,90,60,36,24 

540 ENT 1,12,-4,1 < 

550 ENT -2, = 1000, 60, = 3000, 40 

560 ENV 1,10,1,5,2,-4,1,2,-1,20 

570 windw$(1) = STRING$< 2,250): wind w$ (2) =CHR$(25 1 ) +CHR$(8 \ 

)+CHR$(10)+CHR$(251)+CHR$(8)+CHR$(10)+CHR$(251) 
580 door$(1)=STRING$(2,252):door$(2)=CHR$(253)+CHR$(8)+ i 

CHR$(10)+CHR$<253)+CHR$(8)+CHR$(10)+CHR$(253) 
590 swi tch$C1,0) = CHR$C246) :swi t ch$( 1 ,1 ) =CHR$<247) ' 

600 swi tch$C2,0) = CHR$(248) :swi tch$(2,1)=CHR$(249) < 
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610 gem$=CHR$(144):obj$=CHR$(233) :dog$ = CHR$ £255) 

620 hit$=CHRS(246)+CHR$(248)+CHR$(247)+CHRS(249)+CHR$(2 

52)+CHR$(253)+CHR$(250)+CHR$<251)+gem$+obj$+dog$ 
630 RESTORE 3010 
640 FOR i=1 TO 5 

650 READ minx(i),ininy(i),maxx(i),iitaxy(i) 
660 READ dir<i,1),dir(i,2),dir(i,3>,dir<i,4) 
670 NEXT 
680 WINDOW #1 ,mi nxC rm)-1 ,maxx( rm) + 1,nti ny ( rrti) -1 ,maxy ( rm) 

+ 1 
690 WINDOW #2,1,14,1,25 
700 CLS #1:PAPER #0,8 
710 RETURN 
720 ORIGIN 50,50 
730 INK 6,24,12 
740 RESTORE 3060 
750 GOSUB 1280 
760 LOCATE 3,20 
770 PEN 5:PRINT">"; 
780 PEN 1:PRINT"Escape Routes"; 
790 PEN 5:PRINT"<"; :PEN 1 
800 LOCATE 1 0,2 : PRINT"IN"; 
810 pause=300:GOSUB 340 
820 CLS:LOCATE 1,3:INK 6,0 

830 PEN 1:PRINT man$;" You The Thief":PRINT 
840 PEN 2:PRINT LEFT$Cdoor$( 1 ), 1 ); LEFTS Cdoor$(2) ,1) ; " D 

oors":PRINT 
850 PEN 3:PRINT swi tch$ C 1 ,0) ; swi tch$ C2,0) ; " LightSwitch 

(OFF)" 
860 PEN 3:PRINT swi t ch$< 1 , 1 ) ; swi t ch$ C 2,1 >; " LightSwitch 

(0N)":PRINT 
870 PEN 4:PRINT LEFTS Cwi ndw$( 1 ) ,1 ); LEFT$(wi ndw$(2) , 1 ); " 

Windows":PRINT 
880 PEN 5:PRINT gemS;" Precious Gems":PRINT 
890 PAPER 1:PEN 0:PRINT obj$;" Obstructions ":PEN 1 : PA 

PER 0:PRINT 
900 PEN 1:PRINT dog$;" The Dog" 
910 PEN 5:PRINT:PRINT:PRINT 

920 PRINT" Use J oysti ck H : PRINT" Or Cursor keys" 
930 dummy=REMAIN(1) 
940 AFTER delay*4,1 GOSUB 340 
950 RETURN 
960 ' 
970 'Generate Gems/obstac Les 
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980 ' 

990 FOR room=1 TO 5 , 

1000 gemr=INT(RND*8)+2:objr=INT(RND*10)+5 

1010 minx = minx(room):miny = irnny(room):ntaxx = maxx(rooi!i):nia 

xy=m3xy C room) 
1020 FOR i=1 TO gemr 

1030x=INT(RND*(maxx-minx+1))+minx ( 

1040 y=INT(RND*(maxy-miny+1))+miny 
1050 gemx(roqm,i )=x:gemy(room,i )=y 
1 060 gems=gems+1 

1070 NEXT i < 

1080 FOR i=1 TO objr 
1090x=INT(RND*(maxx-minx+1))+minx 

1100y=INT(RND*Cmaxy-rainy+1))+miny < 

1110 objx(room,i )=x:objy(room,i )=y 
1120 NEXT i 

11 30 gems ( room) =gemr:obj( room) =objr ( 

1140 NEXT room 

1150 CLS I 

1160 RETURN 

1170 ON rm GOTO 1180,1190,1200,1210,1220 ' 

1180 RESTORE 2670:RETURN , 

1190 RESTORE 2740:RETURN 

1200 RESTORE 2810:RETURN i 

1210 RESTORE 2880:RETURN 
1220 RESTORE 2960:RETURN 
1230 PAPER 0:READ rm$:PAPER 8 
1240 WINDOW /n,minx(rm)-1,maxx(rm)+1,miny(rm)-1,maxy(rm 

)+1:CLS #1 i 

1250 PEN 1: LOCATE 1,1:PRINT SPACE$C19); 

1260 LOCATE 1,1: PRINT "Room :";rm$; ' 

1270 IF Lights(rm) THEN INK 7,10:INK 8,10 ELSE INK 7,0: 

INK 8,0 
1280 READ a$:IF a$="END" THEN RETURN i 

1290 IF a$="D" THEN 2180 
1300 IF a$="W" THEN 2260 

1310 IF a$="L" THEN GRAPHICS PEN 1:GOT0 2340 
1320 IF a$="S" THEN 2420 

1330 IF a$="F" THEN GRAPHICS PEN 6:G0T0 2340 I 

1340 PRINT"***ERROR ***"; 

1350 STOP ' 

1360 ' 

1370 'Display gems/objects 
1380 ■ i 
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1390 PEN 6 

1400 FOR i=1 TO obj(rm) 

1410 LOCATE objx< rm,i ) ,objy C rm,i ) 

1420 >RINT obj$; 

1430 NEXT 

1440 PEN 5 

1450 FOR i=1 TO gemsCrm) 

1460 LOCATE gemx( rm, i ) ,gemy ( rm, i > 

1470 PRINT gem$; 

1480 NEXT 

1490 PEN 1:L0CATE xp,yp:PRINT man$; 

1500 RETURN 

1510 xf=0:yf=0:PEN 1 

1520 IF INKEY(0)<>-1 OR INKEYC72X>-1 THEN yf = -1 

1530 IF INKEY(2X>-1 OR INKEY(73X>-1 THEN yf =1 

1540 IF INKEY(8)<>-1 OR INKEY(74)<>-1 THEN xf=-1 

1550 IF INKEY(1)<>-1 OR INK£Y(75X>-1 THEN xf=1 

1560 IF xf=0 AND yf=0 THEN 1630 

1570 LOCATE xp+xf ,yp+yf : ht$=COPYCHR$(#0> 

1580 IF ASC(ht$)>239 AND ASC(ht$X246 THEN 1510 

1590 IF ht$<>" " THEN 1660 

1600 LOCATE xp,yp:PRINT " "; 

1610 PAPER 0:LOCATE 15,5:PRINT" ";:PAPER 8 

1620 xp=xp+xf:yp=yp+yf 

1630 LOCATE xp,yp:PRINT irianS; 

1640 IF dog>0 THEN dog = dog MOD 2 + 1 : 1 F dog = 2 THEN 2550 

1650 GOTO 1510 

1660 hit-XNSTRCh1t$,ht$>:char=ASC(HID$ ChitS, hit, 1)> 

1670 ON hit GOTO 1690,1690,1690,1690,1750,1750,1850,190 

0,1970,2090,2650 
1680 GOTO 1600 

1690 IF hit>2 AND hit<5 THEN char=char-1 
1700 IF hit<3 THEN char=char+1 

1710 PEN 3:LOCATE xp+xf ,yp+yf : PRINT CHRSCchar); 
1720 LightsCrm)=Lights(rm> XOR 1 
1730 IF Ughts(rm) THEN INK 7,10:INK 8,10 ELSE INK 7,0: 

INK 8,0 
1740 GOTO 1510 

1750 IF xf<>0 AND yf<>0 THEN 1630 
1760 IF xf<0 THEN dir=4 ELSE IF xf>0 THEN di r = 3 
1770 IF yf<0 THEN dir=1 ELSE IF yf>0 THEN dir=2 
1780 IF dir<rm,dir)=-1 THEN 1630 ELSE rm=di r ( rm,di r) 
1790 IF dog>0 THEN GOSUB 310 
1800 IF dir=1 THEN xp=6:yp=maxy ( rm) 
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1810 IF dir-3 THEN xp = 6 : yp = mi ny C r m > 

1820 IF dir=3 THEN xp=mi nx C rm) : yp=13 

1830 IF dir = 4 THEN xp = maxx ( rm) : yp = 1 3 

1840 RETURN 

1850 IF xp>5 AND xp<8 THEN 1880 

1860 IF xp<6 THEN dir=4 ELSE dir=3 

1870 GOTO 1780 

1880 IF yp>13 THEN dir = 2 ELSE dir=1 

1890 GOTO 1780 

1900 PAPER 0:CLS:PEN 1 

1910 LOCATE 3,3:PRINT"You have escaped"; 

1920 LOCATE 9,5 : PRINT"wi t h"; 

1930 IF gems = stolen THEN LOCATE 8,7: PRINT"AU"; ELSE LO 

CATE 9,7 
1940 PRINT USING " ##";stolen; 
1950 PEN 5:LOCATE 9,9 : PRINT"Gems"; 
1960 dead=1 :RETURN 

1970 LOCATE xp,yp:PRINT" " ; : xp = xp + xf : yp = yp + yf 
1980 i=0 
1990 i=i+1 

2000 IF i>gems(rm) THEN 1510 

2010 IF gemx(rm,i )<>xp OR gemy ( rm,i ) <>yp THEN 1990 
2020 IF i=gems(rm) THEN 2050 
2030 gemxCrm,i)=gefnxCrm / gems(r(ti)) 
2040 gemy C rm,i)=gemy(rm, gems (rm)) 
2050 gems(rm)=gems(rm)-1:stolen=stoLen+1 
2060 MOVE 400,150+<stoLen*2),1,1:DRAU 520, 1 50+ ( sto Len*2 

) , 1 , 1 
2070 SOUND 129,248,10,12,0,1 
2080 GOTO 1980 
2090 noi se=INTCRND*15) 
2100 SOUND 1,3000, 10, noise, 0,0, 10 
2110 PAPER 0:LOCATE 1 5,5 : PRINT"C rash ";:PAPER 8 
2120 IF noise<10 OR deLay=50 THEN 1630 
2130 delay=delay-50 
2140 dumny=REMAINC1 ) 
2150 AFTER deLay*4,1 GOSUB 310 - 

2160 GOTO 1630 
2170 ' ( 



2180 ' Draw doors 
2190 



i 



i 



2200 READ no,dr$ i 

2210 IF dr$="V" THEN dr = 2 ELSE dr=1 

2220 PEN 2 i 

continued on the next page 
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2230 
2240 
2250 
2260 
2270 
2280 
2290 
2300 
2310 
2320 
2330 
2340 
2350 
2360 
2370 
2380 
2390 
2400 
2410 
2420 
2430 
2440 
2450 
2460 
2470 
2480 
2490 
2500 
2510 
2520 
2530 
2540 
2550 
2560 
2570 

2580 
2590 
2600 
2610 
2620 
2630 
2640 
2650 



pic$=doorS(dr) :GOSUB 2500 

GOTO 1280 
i 

' Draw wi ndows 
t 

READ no,ui$ 

IF wi$="V" THEN ui=2 ELSE wi=1 

PEN 4 

pi c$=wi ndw$<ui ) :GOSUB 2500 

GOTO 1280 
t 

' Draw tines 

READ x1,y1,x2,y2 

HOVE x1,y1,,0 

DRAW x1,y2,,0:DRAW x2,y2,,0 

DRAW x2,y1,,0:DRAW x1,y1,,0 

GOTO 1280 
i 

1 Draw swi tches 
i 

READ no,sw$ 

IF sw$="L" THEN sw=1 ELSE sw = 2 

PEN 3 

pic$=swi tch$(su,0) :G0SUB 2500 

GOTO 1280 
i 

'Print char 



x,y:PRINT 
THEN 2520 



pic$; 



READ x,y:LOCATE 

no=no-1 : I F no>0 

RETURN 

PEN 1:L0CATE dogx,dogy : PRINT" "; 

man$=CHR$C225) 

IF (dogx=xp AND dogy=yp) OR (dogx=xp+xf AND dogy=y 

p+yf) THEN 2650 

THEN 

THEN 

THEN 

THEN 

LOCATE dogx,dogy :PRINT dog$; 
SOUND 1 / 0,RND*40 / 10 / 1,2 / 31 
GOTO 1510 
PRINT"SNAP"; 
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IF dogx<xp 

IF dogx>xp 

IF dogy<yp 

IF dogy>yp 



dogx=dogx+1 

dogx=dogx-1 
dogy=dogy+1 
dogy=dogy-1 
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2660 dead=1 :RETURN 

2670 DATA Hallway 

2680 DATA L, 64, 308, 226,4 

2690 DATA D, 2, H, 6, 3, 6, 22 

2700 DATA D, 2, V, 4, 12, 9, 11 

2710 DATA S,1,L,4,11 

2720 DATA S,1,R,9,14 

2730 DATA END 

2740 DATA Lounge 

2750 DATA 1,2,308,258,4 

2760 DATA D,1,V,10,12 

2770 DATA W,1,H,6,3 

2780 DATA W,1,V,2,12 

2790 DATA S ,2 ,R, 1 0, 1 1 , 1 0, 1 5 

2800 DATA END 

2810 DATA Di ni ng room 

2820 DATA L, 2, 308, 258, 4 

2830 DATA W,1,V,10,12 

2840 DATA W,1,H,6,3 

2850 DATA D,1,V,2,12 

2860 DATA S,2,L,2, 1 1 ,2,1 5 

2870 DATA END 

2880 DATA Ki tchen 

2890 DATA L, 2, 276, 384, 4 

2900 DATA D, 2, H, 6, 5, 6, 22 

2910 DATA «,1,H,10,22 

2920 DATA W,1,V,14,13 

2930 DATA D,1,V,2,13 

2940 DATA S,1,L,2,16 

2950 DATA END 

2960 DATA Pantry 

2970 DATA L, 2, 276, 256, 4 

2980 DATA D,1,V,10,12 

2990 DATA S,1,R,10,11 

3000 DATA END 

3010 DATA 5,4,8,21,0,4,3,2 

3020 DATA 3,4,9,21,-1,-1,1,-1 

3030 DATA 3,4,9,21,-1,-1,-1,1 

3040 DATA 3,6,13,21,1,0,-1,5 

3050 DATA 3,6,9,21,-1,-1,4,-1 

3060 DATA L, 64, 308, 480, 100 

3070 DATA F, 250, 98, 294, 102 

3080 DATA F, 250, 306, 294, 310 

3090 DATA F, 390, 94, 430,1 06 
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3100 DATA F,390, 302,430,314 

3110 DATA F,474, 240,488,270 

3120 DATA F, 474, 124, 488, 154 

3130 DATA F, 58, 240,72, 270 

3140 DATA L, 226, 308, 322, 180 

3150 DATA L, 160, 180,480,100 

3160 DATA L, 64, 180, 160, 100 

3170 DATA END 



If you've enjoyed these games, you may like to join the 
AMSTRAD COMPUTER USERS' CLUB. As well as many other 
benefits and privileges, you get a free monthly magazine which 
includes program listings for games and "utilities', special 
features, free competitions, and up to the minute information 
-from the source! 
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(Note that all references given in this index correspond to chapter 
and page number, e.g. 1.42 refers to chapter 1 page42.) 



IA 1.42 1.72 5.7 

Aborting system disc functions 1.76 

ABS 3.3 

AFTER 3.4 8.29 

Amplifier (external) 1.9 7.39 

AMSDOS 1.72 5.1 5.25 

AMSDOS commands 5.7 

AMSDOS error messages 5.14 7.31 7.32 

AMSDOS filenames 5.2 5.3 

AND 3.4 8.18 

AND(LOGO) : 6.11 

Animation 8.53 

.APV 6.29 

Arithmetic operations 1.33 7.27 7.28 

Arithmetic operations (LOGO) 6.10 

Arrays 2.3 3.18 3.25 7.28 

ASC 3.5 

ASCII 6.7 7.8 7.21 

ASCII characters 7.8 7.9 8.15 

ASCIIfiles 1.43 3.71 5.11 7.29 

ASM 5.27 

ATN 3.5 

AUTO 2.10 3.5 



B 



IB 1.42 1.72 5.8 

Backup master disc 1.74 1.75 4.1 

BASIC 1.22 3.1 7.32 8.7 

BASICdisc 4.2 

BF 6.7 

BIN$ 3.6 

Binaryfiles 1.43 3.71 
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Binary numbers 8.9 

Bit 8.9 

BK 6.18 

BL 6.7 

BOOTGEN 5.27 

BORDER 1.47 3.6 7.6 

BREAK 3.6 

BRIGHTNESS control 1.4 

BUTTONP 6.23 

BYE 6,6 6.26 

Byte 8.9 



CALL 3.7 

CAPSLOCKkey 1.16 

Cassette operation 1.7 1.73 4.7 5.22 

CAT 1.41 3.7 

CAT(cassette) 4.7 

CATCH 6.28 

CHAIN 3.7 

CHAIN (cassette) 4.9 

CHAINMERGE 3.8 

CHAIN MERGE (cassette) 4.9 7.39 

Changingdiscs 5.2 7.31 

CHAR 6.7 

Characters 1.53 7.9 7.43 8.14 

Checking discs 1.76 5.22 

Checksum 8.32 

CHKDISC 1.76 5.22 

CHR$ 1.53 3.8 8.16 

CINT 3.8 

Circles 1.58 

CLEAN 6.15 

CLEAR 3.9 

CLEARINPUT 3.9 \ 

CLG 3.9 

CLOAD 5.22 ' 

CLOSEIN 2.10 3.10 i 

CLOSEIN (cassette) 4.10 

CLOSEOUT 2.9 3,10 ' 

< 
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CLOSEOUT (cassette) 4.11 

CLRkey 1,17 

CLS 1.22 3.10 7.4 

CO 6.26 

Colours 1.46 

CON 5.20 

Configuration sector 5.17 

Configuring a disc 4.5 

Connecting a mains plug 1.1 

Connecting up the computer 1.2 

Connecting peripherals 1.7 7.38 7.39 7.40 7.41 

Console control codes (CP/M) 5.17 

Console commands 5.18 

CONT 3.10 7.29 

.CONTENTS 6.28 

CONTRAST control 1.4 

Control characters 7.3 8.51 

Controlcodes 7.1 7.3 8.51 

Copy cursor editing 1.28 

COPYCHR$ 3.11 

COPYDISC 1.75 5.22 

Copying discs 1.74 5.22 

Copyingfiles 1.42 5.10 5.21 

COPYkey 1.28 

COS 3.11 

COS(LOGO) 610 

COUNT 6.8 

CP/M 5.16 

ICPM 1.39 5.8 

CP/Mfilenames 5.18 

CP/M system disc 1.39 1.74 4.2 

CP/M system tracks 5.17 

CREAL 3.11 

CS 6.16 

CSAVE 5.22 

CT 6.14 

Cube root 1.35 

CURSOR 3.12 7.3 

Cursor keys 1.15 
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DATA 3.12 7.27 8.31 

Data only format 5.25 7.75 

DC sockets 1.2 1.3 

DDT 5.27 

DEC$ 3.13 

.DEF 6.30 

DEFFN 3.13 7.29 

DEFINT 3.14 

DEFREAL .„. 3.14 

DEFSTR 3.15 

DEG 3.15 

DELkey 1.15 

DELETE 3.16 

.DEPOSIT 6.29 

DERR 3.16 7,31 7.32 

DI 3.17 8.30 

DIM 2.3 3.18 7.28 

DIR(CP/M) 1.40 5.19 

DIR(LOGO) 6.22 

IDIR 5.8 

Direct console commands 5.18 

Discs 1.11 1.38 4.1 

I DISC 1.73 5.8 

DISCCHK 1.76 5.22 

DISCCOPY 1.74 5.22 

Discdirectory , 5.1 7.31 

Disc drive (additional) 1.8 1.75 7.40 

DISCDRIVE2 socket 1.9 7.40 

Disc file commands (LOGO) 6.22 

1 DISC.IN 1.73 5.8 

DiBC organisation 7.44 

IDISC.OUT 1.73 5.8 

DOT 6.16 

Dottedlines 3.43 8.49 

DRAW 1.56 3.19 

DRAWR 3.19 

1 DRIVE 5.9 

Dr.LOGO 6.1 

DUMP 5.27 
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ED 5.27 

EDIT 1.27 3.20 

Editing 1,27 

Editing(LOGO) 6.5 6.14 

EI 3.20 8.30 

EJECTbutton 1.14 

ELSE 1,29 3,20 

EMPTYP 6.8 

END 3.21 

END(LOGO) 6.13 

ENT 1.69 3.21 8.41 

ENT(LOGO) 6.25 

ENTERkey 1.15 1.18 

ENV 1.67 3.23 8.38 

ENV(LOGO) 6.25 

Envelope planner 7.37 

EOF 3.25 4.10 5.7 7.29 

ER 6.21 

ERA 5.19 

I ERA 5.9 

ERASE 3.25 

ERL 3.25 

ERN 6.21 

ERR 3.26 7.32 

ERRACT 6.29 

ERROR 3.26 

ERROR(LOGO) 6.28 

Errormessages 7.27 

Error messages (AMSDOS) 5.14 7.31 7.32 

Errornumbers 7.27 

ESCkey 1.17 

EVERY 3.27 8.29 

EX1 andEX2 programs 5.5 

.EXAMINE 6.29 

Exception handling commands (LOGO) 6,28 

EXP 3.27 

Expansion characters 3.37 7.22 

EXPANSION socket 1.10 7.40 

Exponentiation 1.35 1.37 

External commands 5.7 7.30 
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FALSE 6.29 

FD 6.18 

FENCE 6.16 

FILECOPY 4.2 

File copying tables 5.12 5.13 

Filenames 1.41 5.2 5.3 5.18 

Filetypes 5.2 

FILL 1.60 3.27 8.48 

FIRST 6.8 

FIX 3.28 

Flashing colours 1.50 

Flow of control commands (LOGO) 6.26 

Flush sound channels 3.73 8.38 

FN 3.28 

FOR 1.30 3.28 7.27 7.30 8.16 

FORMAT 1.40 5.25 

Format(print) 3.61 8.22 

FormaUdisc) 1.38 1.40 7.44 

FPUT 6.8 

FRAME 1.55 3.29 

FRE 3.29 

FS 6.16 



GLIST 6.21 

GO 6.26 

GOSUB 1.31 3.30 7.27 

GOTO 1.24 3.30 

Graphic screen commands (LOGO) 6.15 

Graphics 1.53 8,47 

GRAPHICSPAPER 3.30 8.50 

GRAPHICSPEN 3.31 8.48 

GPROP 6.22 



Hardware 7.45 7.46 8.56 

Headers 5.3 5.12 5.13 

Headphones 1.9 



i 
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HEX$ 3.31 

Hexadecimal numbers 8.11 

HIMEM 3.32 

Hold sound channels 3.73 8.38 

HT 6.18 



IBMformat 5.25 7.45 

IF 1.28 3.32 

IF(LOGO) '. 6.26 

Indicator lamp (disc) 1.14 

INK 1.48 3.33 7.6 

INKEY 3.33 7.43 

INKEY$ 2.12 3.34 7.43 

Inkmodes 7.5 8.52 

INP 3.34 

INPUT 1.25 2.2 3.35 7.28 

INPUT (cassette) 4.10 

Inserting discs 1.11 

INSTR 2.5 3.36 

INT 3.36 

INT(LOGO) 6.10 

Interrupts 7.7 8.29 

I/O 7.38 7.46 

ITEM 6.9 



JOY 3.37 7.43 

Joystick commands (LOGO) 6.23 

Joysticks 1.7 7.21 7.23 7.43 

JOYSTICK socket 1.7 7.38 



KEY 3.37 7.22 

KEYDEF 3.38 7.22 7.43 

Keyboard 1.15 7.21 7.22 7.23 7.43 

KEYP 6.23 

Keywords 1,22 3.1 7.32 
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LABEL 6.27 

LEFT$ 3.39 < 

LEN 2.8 3.39 

LET 3.39 ' 

LINEINPUT 3.40 i 

LINE INPUT (cassette) 4.10 

LIST 1.23 3.40 ' 

LIST(LOGO) 6.9 

Listprocessingcomrnands(LOGO) 6,7 

LOAD 1.42 3.41 

LOAD (cassette) 4,9 

LOAD(LOGO) 6.23 

Loading software 1.20 

Loadingthe Welcome program 1.21 

LOCAL 6.13 

LOCATE 1.53 4.41 7.6 

LOG 4.42 

LOG10 3.42 

Logging in a disc 5.17 

Logic 8.18 

Logical operations (LOGO) 6.11 

LOGO 6.1 

LST 5.20 

LT 6.18 

LOWER$ 3.42 



Machine code 7.7 

Mains plug connections 1.1 

MAKE 6.13 

MASK 3.43 8.49 

MAX 3.43 < 

MEMORY 3.44 7.27 

Memory map 7.45 ' 

Menu 2.5 3.51 3.52 ^ 

MERGE 3.44 

MERGE (cassette) 4.9 < 

MID$ 3.44 

MIN 3.45 



i 
i 

i 
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Mixed calculations 1.36 

MOD 1.34 3.46 

MODE 1.45 3.46 7,3 

Modulator/power supply (MP2) 1.3 1.5 1.65 

Monitor 1.2 

MONITORsocket 1.2 1.3 7.39 

MOVCPM 5.26 

MOVE 1.57 3.47 

MOVER 3.47 

Musical notes 7.24 

Musicplanner 7.37 



NEW 3.48 

NEXT 1.30 3.48 7.27 7.30 8.16 

NODES 6.6 6.21 

NOT 3.48 8.20 

NOT(LOGO) 6.11 



ONBREAKCONT 3.49 

ONBREAKGOSUB 3.49 

ONBREAKSTOP 3.50 

ONERRORGOTO 3.50 7.29 7.32 

ONGOSUB 2.10 3.51 

ON GOTO 3.52 

ON indicator 1.4 1.5 

ONSQGOSUB 3.52 7.7 8.44 

OP 6.27 

OPENIN 2.10 3.53 7.29 7.30 

OPENIN (cassette) ; 4.10 

OPENOUT 2.9 3.53 7.30 

OPENOUT (cassette) 4.11 

Operators 1.33 8.18 

OR 3.54 8.19 

OR(LOGO) 6.12 

ORIGIN 1.59 3.54 

OUT 3.55 
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PADDLE 6.24 

PAL 6.16 I 

PAPER 1.47 3.55 7.4 

PAUSE 6.28 

PD 6.18 \ 

PE 6.19 

PEEK 3.56 

PEN 1.47 3.56 7.15 i 

Peripheral management 5.20 

Peripherals 1.7 

PI 3.57 ( 

PIP 5.20 

Planners 7.34 7.35 7.36 7.37 ' 

PLIST 6.22 i 

PLOT 1.56 3.57 

PLOTR 3.58 

PO 6.13 

POKE 3.58 

POS 3.59 4.10 

POTS 6.13 

POWERswitch 1.4 1.5 

PPROP 6.22 I 

PR 6.14 

Primitives 6.7 

.PRM 6.30 ' 

PRINT 1.22 3.59 8.22 f 

Print formatting 3.61 8.22 

PRINTSPC 3.60 8.23 

PRINTTAB 3.60 8.23 

PRINTUSING 3.61 8.23 

PRINTERsocket 1.8 7.41 

Printers 1.8 7.41 7.42 7.43 

Procedures 6.3 6.13 

Property list commands (LOGO) 6.21 

Protected files 1.43 3.71 

PU 6.19 

PUN 5.20 

PX 6.19 
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Queue(sound) 3.52 3.77 7.7 8.44 



R 



RAD 3.64 

RANDOM 6.10 

RANDOMIZE 3.64 

Random numbers 3.69 

RC 6.24 

RDR 5.20 

READ 3.64 7.27 7.28 8.31 

Readerrors 4.8 

Read/Only files 5.11 5.23 7.31 

RECYCLE 6.6 6.21 

REDEFP 6.29 

RELEASE 3.65 8.43 

RELEASE (LOGO) 6.25 

REM 1.30 2.2 3.65 

REMAIN 3.66 8.30 

REMPROP 6.22 

REN 5.19 

IREN 5.9 

Rendezvous sound channels 3.73 8.37 

RENUM 3.66 

REPEAT 6.27 

Resetting the computer , 1.20 1.21 

RESTORE 3.67 8.33 

RESUME 3.67 7.29 

RESUMENEXT 3.68 

RETURN 1.31 3.68 7.27 

RIGHT? 3.69 

RL 6.24 

RND 3.69 

RQ 6.25 

ROINTIME.DEM program 1.20 

ROUND 3.70 

RT 6.19 

RUN 1.23 1.42 3.70 

RUN (cassette) 4.9 

RUN (LOGO) 6.27 

Running the Welcome program 1.21 
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SAVE 1.41 1.43 3.71 

SAVE (cassette) 4.13 

SAVE(CP/M) 5 18 

SAVE (LOGO) 6.23 

Saving to cassette 4.12 

Saving variables 2.9 3.90 5.5 

Screendump 1,44 3.71 5.5 

SE ; 6.9 

SETH 6.19 

SETPAL 6.16 

SETPC 6,20 

SETPOS 6.20 

SETSPLIT 6.15 

Settingup 1,1 

SETUP 5.24 

SF 6.17 

SGN 3.72 

SHIFTkeys 1.15 

SHOW 6.15 

SidewaysROMS 7 46 

SIN 3.72 

SIN (LOGO) 6.10 

Software 1.20 

SOUND 1.65 3.73 7.24 8.35 

SOUND(LOGO) 6.25 

Sound commands (LOGO) 6.25 

Sound envelope planner 7 37 

SPACE$ 3.75 

SPC 3.75 8.23 

Speakers (external) 1.9 

Speech synthesiser 1,10 

SPEED INK 3.75 

SPEEDKEY 3.76 

SPEED WRITE 3.76 4.13 

Sprites 8.54 

SQ 3.77 8.45 

SQR 1.34 3.77 

Square root 1.34 3.77 

SS 6.17 

ST 6.20 
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STAT 5.23 

STEP 3.78 

Stereo 1.9 1.65 7.39 

STEREOsocket 1.9 1.65 7.39 

STOP 3.78 

STOP(LOGO) 6.27 

STR$ 3.78 

STRING$ 3.79 

String variables 1.25 7.28 

SUBMIT 5.27 

SWAP 3.79 

Switching on 1.4 1.5 

SYMBOL 3.79 7.5 8.21 

SYMBOLAFTER 3.81 

Syntaxerror 1.18 7.27 

SYSGEN 5.26 

Systematise 1.39 1.74 4.2 

Systemformat 5.25 7.44 

System management 5.23 

System primitives (LOGO) 6.28 

System properties (LOGO) 6.29 

System tracks (CP/M) 5.17 

System variables (LOGO) 6.29 



TAB 3.82 8.23 

TAG 3.82 8.50 

TAGOFF 3.83 8.50 

TAN 3.83 

ITAPE 1.73 5.9 

ITAPE.IN 1.73 5.10 

I TAPE.OUT 1.73 5.10 

TAPE socket 1.7 7.39 

TEST ;.. 3.84 

TESTR 3,84 

Text screen commands (LOGO) 6.14 

Text/window planners 7.34 7.35 7.36 

TF 6.20 

THEN 1.28 3.84 

THROW 6.28 
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TIME 3.85 

TO 3.85 

TO(LOGO) 6.14 I 

Toneenvelope 1.69 3.21 8.41 

TOPLEVEL 6.29 ( 

Transient commands 5.20 j 

Transparent writing 7.5 8.51 

TROFF 3.86 ' 

TRON 3.86 , 

TRUE 6.29 

TS 6.15 

Turnkey BASIC disc 4.3 

Turnkey CP/M disc 4.4 

Turtle graphics commands (LOGO) 6.18 

TV receiver 1.3 1.5 

TYPE(CP/M) 5.19 

TYPE (LOGO) 6.15 



UNT 3.86 

UPPER$ 3.86 

User defined characters 3.79 8.21 

User defined keys 3.37 7.21 7.22 7.23 

IUSER 5.10 

USING 3.87 8.23 



VAL 3.87 

Variables 1.25 7.32 8.15 

Variables (LOGO) 6.4 6.13 

Variables (saving) 2.9 3.90 5,5 

Vendor format 5.25 7.44 

Vertical hold control 1.4 

Vibrato 8.42 

VOLUME control 1.9 1.65 

Volume envelope 1.67 3.23 8.38 

VPOS 3.87 
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X 



WAIT 3.88 

WAIT(LOGO) 6.27 

Wake-up message 1,4 1.5 

Welcome program 1.21 

WEND 3.88 7.30 

WHILE 3.88 7.27 7.30 

WIDTH , 3.89 

Wildcards 5.4 

WINDOW 2.11 3.89 7.5 8.26 

WINDOW (LOGO) 6.17 

Window planners 7.34 7.35 7.36 

WINDOWSWAP 3.90 8.27 

WORD 6.9 

WORDP 6.9 

Workspace management commands (LOGO) 6.21 

WRAP 6.17 

WRITE 2.9 3.90 8.23 

Write protection 1.12 



XOR 3.91 8.20 

XPOS 3.92 

XSUB 5.27 

Y 

YPOS 3.92 

z 

ZONE 3.92 8.22 
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